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SCO 0001 



3 
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12 
IS 
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IS 
16 
17 
16 
19 
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.TITLE CVMJABO fISVll-J MEMORY DIAG. 

.NLIST TOC 

.REM 



PRODUCT CODE 
PRODUCT NAME 
PRODUCT DATE 
MAINTAINER: 



IDENTIFICATION 
AC-U135B-MC 

CVMJABO MSVll-J MEMORY DIAGNOSTIC 
OCTOBER 1965 
E.S.D. METHODS 



Th« information in this document is subject to change 
without notice and should not be construed as a commitment 
by Digital Equipment Corporation. Digital Equipment 
Corporation assumes no responsibility for any errors that 
may appear in this manual. 

The software described in this document is furnished to the 
purchaser under a license for use on a single computer 
system and can be copied (with inclusion of Digital's 
copyri^t notice) only for use in such system, except as may 
otherwise be provided in writing by Digital. 

for 
is 



Digital Equipment Corporation assumes no responsibility 
the use or reliability of its software on equipment that 
not supplied by Digital. 

COPYRIGHT CO 1965 Digital Equipment Corporation 
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S£Q 0002 



OPERATIONAL SWITCH SETTINGS 
SWITCH REGISTER DEFINITIONS 



SWITCH USE 



IS HALT ON ERROR 

14 LOOP ON TEST 

13 INHIBIT ERROR TYPEOUTS 

12 INHIBIT RELOCATION 

11 QUICK VERIFY 

10 BELL ON ERROR 

9 LOOP ON ERROR 

8 HALT PROGRAM (UNRELOCATED RESTORE LOADERS) 

7 DETAILED ERROR REPORTS 

6 INHIBIT CONFIGURATION MAP 

5 LIMIT MAX ERRORS PER BANK 

4 FAT TERMINAL (132 COLUMNS OR BETTER) 

3 TEST MODE - SEE DOCUMENT 

2 TEST MODE • SEE DOCUMENT 

1 TEST MODE - SEE DOCUMENT 

0 DETECT SINGLE BIT ERRORS 
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100 
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6.2 
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105 


7.1 


106 


7.2 


107 


7.3 
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7.4 


109 


7.5 
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Default Test Sequence 
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Prograw Options 
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Error Reporting 
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Error Halts 

PROGRESS REPORTS 
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MSVll-L/P CSR 
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SEQ 0004 



111 



113 1.0 GENERAL PROGRAn INTORriATION 

114 

116 1.1 Program Purpose (Abstract) 

117 

118 a. Intended for use on all POP - 11/23/236/73 ' s which meet the conditions 

119 in 1.2.1. 
120 

121 b. This program Mill be used by system managers and operators to 

122 determine the correct operation of main meatory and also it Mill 

123 be primarily used by field service and manufacturing to isolate 

124 failures to the memory and to isolate failures Mi thin the memory 

125 to the correct card. 
126 

127 c. The object of this software is to functionally test and verify 

128 sll mam memory functions as fast as possible. 
129 

130 d. There is the cspability of testing mixed configurations (MSVll-L. 

ISl and HSVll-P) on the system. 

132 

133 e. It has a special maintenance mode (Field Service Mode) to provide 

134 specific functional capabilities. 
135 

136 

137 

136 1.2 System Requirements 

139 

140 1.2.1 HardMare Requirements - 

■41 

142 POP- 11/23/238/44/63/84 CPU with 18/22 bit addressing and at 

143 least 64K (16 Bit Words) of Memory and Memory Management. 



146 ****** NOTE ****** 
147 

148 1. Like memory types must be on 16K Mord boundaries 

149 starting at physical address 0. 

150 

151 2. REFERENCE KTJll document for proper configuration 

152 of unibus memory for 11/84 



CVMJABO MSVll-J h€riO«Y OIAG. 



nACftO Y0S.02 Monday 07-0ct-8S 16:57 P»ge 7 



SEQ 0005 



154 

156 1.2.2 So^tMsrc Requirements - 

15$ This program is designed to run stand alone or under any of the 

159 following Monitors: 

161 XXOP* 

162 ACT 
165 APT 
164 

165 
166 

167 1.3 Related Documents And Standards 

16e 

169 

170 1. Microcomputers and Memories (EB-20912-20) 

172 2. POP-11/23 User's Guide 

173 

174 5. MSVll-J Users guide 

175 

176 4. MSVll-L Users Guide 

177 

176 S. MSVll-P Technical Manual 

179 

lao 

161 1.4 Diagnostic Hierarchy Prerequisites 

162 

163 If the program in any way misbehaves, then: 
164 

16S 1. Try it again with Cache off (reference Section 2.4.3.1) 

166 

167 2. Inhibit relecatior (reference section 2.4.1) 

166 

169 3. Try CPU Diagnostics 

190 

191 4. Try Memory Management Diagnostics 

192 

193 5. Try Cache Diagnostics (where applictible) 

194 

195 6. Try Q8US Map Diagnostics (where applicable) 

196 

197 
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SEQ 0006 



1 99 1-5 Assuapt i ons 

200 

201 This progrwK ■••um«8 the correct operation of the CPU. tlamory 

202 ManagaMnt, Cache, and the QBUS Map. This program occupies 

203 (initially) Bank 0 (0-16K}. The XXDP« loaders are in bank 1. 
204 

20S 
206 

207 2.0 OPERATING INSTRUCTIONS 

206 

209 

210 2.1 Loading Starting Procedures 

211 

212 

219 2.1.1 Quick Starting - 
214 

215 

216 1. Load address 200 

217 

218 2. Set SMitch register for options (normally 0) 

219 

220 3. Start 
221 

222 
223 

224 NOTE 
225 

226 BE SURE that the peripheral page jumper (where applicable) 

227 I a in place: failure to do so sends the diagnostic to 

228 Ncver-Never Land. 
229 

230 
231 
232 
233 

234 2.1.2 Stopping - 

235 

236 1. Set SU8. and/or 

237 

238 2. Type control "C" (Reference section 2.4.4,1). 

240 
241 
242 

243 2.1.3 Restarting (Preserve Configuration Table) - 

244 

245 1. Load address 202 

246 

247 2. Set SMitch register for options (Normally 0) 

248 

249 3 . Start 

250 
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SEO 0007 



252 




253 




254 




255 




256 




257 




258 


2.1.4 


259 




260 


SMITC 


261 




262 




263 


15 


264 


14 


265 


13 


266 


12 


267 


11 


268 


10 


269 


9 


270 


8 


271 


7 


272 


6 


273 


5 


274 


4 


275 


3 


276 


2 


277 


1 


278 


0 



Register Options - 
USE 



HALT ON ERROR 

LOOP ON TEST 

INHIBIT ERROR TYPEOUTS 

INHIBIT RELOCATION 

QUICK VERIFY 

BELL ON ERROR 

LOOP ON ERROR 

HALT PROGRAM (UNRELOCATE RESTORE LOADERS) 

DETAILED ERROR REPORTS 

INHIBIT CONFIGURATION MAP 

LIMIT MAX ERRORS PER BANK 

FAT TERMINAL (152 COLUMNS OR BETTER) 

TEST MODE - SEE DOCUMENT 

TEST MODE - SEE DOCUMENT 

TEST MODE - SEE DOCUMENT 

DETECT SINGLE BIT ERRORS 
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SEQ OOOS 



280 
281 
282 
283 
284 
285 

286 2.2 Dafault Taat Saquanea 

287 

289 Th« folloMing two list* give th* t**t protocol for parity and ECC 

290 M*«ory. T«*t* marked with a ar« not normally run except under ACT 

291 or APT, or through a Fiald S*rvic« Comnand (R*f*r*nc* Section 

292 2.4.4.8). 
293 

294 
295 

296 2.2.1 Te*t Protocol For ttSVll-L/P Parity ttamory - 

297 

296 

299 T*st T**t Nan* Tim* (**c/16K} 

300 

301 34 Soft Error T««t <1 

302 6 Initial Data T**t <1 

303 17 Holding 1'* and 0'* T*st <1 

304 7 Addre** Bit T«*t <1 

305 1 Addr*** Test <1 

306 2 ComplsHMnt Addr*** T*st <1 

307 3 3 XOP 9 T**t 1 
306 4 Rotating 0'* T**t 1 

309 5 Rotating 1'* T**t 1 

310 21 Marching 1'* and 0'* T**t 1 
Sll 35 Uorst Ca*e Noi** Parity T**t n/a 

312 * 22 Refresh Test 10 

313 * 23 Shifting Diagonal Test 10 

314 26 Random Data Test <1 

315 * 24 Fast Galloping Pattern T**t 20 

316 * 31 Sob-a-long T«*t 3 

317 • 32 Writ* Recovery Te*t <1 

318 * 33 Branch Gobbl* T**t 35 

319 34 Soft Error T**t <1 
320 

321 
322 
323 
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SEQ 0009 



325 
326 
327 
328 

329 2.2.2 T««t Protocol for MSVll-J ECC M«««ory 

331 Pattern Pattern Naaw Tima (aac/16K) 

332 

333 5 Rotating I'a Taat 1 

354 34 Soft error Taat <1 

335 6 Initial Data Taat <1 

336 44 Shifting chack bita thru tha CSR 5 

337 14 Baaic Doubla Bit Error taat <1 

338 45 Syndrotnaa in CSR on QBE taat <1 

339 36 Corraction coda taat 1 

340 20 Syndrotnaa in CSR on SBE taat 1 

341 37 Chack ECC Diaabla Taat <1 

342 41 Addraaa to CSR on OBE taat 1 

343 42 Extandad addraaa to CSR taat <1 

344 43 Byta Mrita taat <1 

345 46 Chack SBE with ECC Diaabla taat <1 

346 47 No CSR updata on SBE with DBE taat <1 

347 10 Byta Addraaa Taat <1 

348 17 Holding I'a and O'a Taat <1 

349 7 Addraaa Bit Taat <1 

350 1 Addraaa Taat <1 

351 2 Coaplanant Addraaa Taat <1 

352 4 Rotating O'a Taat 1 

353 5 Rotating I'a Taat 1 

354 21 Marching O'a and I'a Taat 1 

355 * 22 Rafraah Taat 10 

356 26 RandoM Data Taat <1 

357 * 24 Faat Galloping Pattarn Taat 20 

358 * 31 Sob a-long Taat 3 

359 * 32 Urita Racovary Taat <1 

360 * SS Branch Gobbla Taat 35 

361 34 Soft Error Taat <1 

362 
363 

364 8 - Run only on tha first Paaa whan und«r ACT or APT 

365 

366 

367 At tha and of aach Paaa tha program will run cleanup Patterns 

368 #30. and #27 for all banka. 
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SEQ 0010 



570 
571 
572 
575 
574 

576 2.5 Special Environments 

577 

578 2.5.1 XXDP* 

579 

5S0 The first pass m!11 be a quick verify pass if and only if it ts in 

581 chain node. 

582 

585 

584 

585 2.5.2 ACT APT Automatic Mode - 

586 

387 The program Mill not create double bit errors (DBE's) after the 1st 

588 pee* ■ 

589 

590 

591 

592 

395 2.5.2.1 APT Execution Times - 
594 

595 

396 Here are some measured execution times for an 11/25B under APT 
597 

39S 1st QV Pass 2nd Pass onward 

599 

400 1C24K MSVll-J 50 mm 30 mm 

401 

402 256K MSVll-L 20 min 20 mm 

405 

404 128K M5V11-P 20 min 20 min 

405 

406 

407 The first pass Mill be a quick verify pass 

408 

409 

411 NOTE 
412 

4X3 Even though the first pass is a QV pass 

4X4 it takes longer than the subsequent 

4X5 non-QV passes due to the fact that it is 

4X6 running more patterns, some of Mhich 

4X7 (patterns #24 and #33 for example) can 

4X6 ^ extrememly time consuming. 

419 

420 

421 
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SEQ 0011 



423 2.3.2.2 M>T EnviroraMnt TabU - 

429 TK« follOM!f>9 tabl* flivM momm of tK« standard aattinga for th« APT 

426 E-Tabl«. TK«y aay b* aodifiad as notad as tha uaar oaas fit. 

427 

426 FIRST PASS RUN TIME: 

429 This paraMtar should ba sat according to tha aaount and typa of 

450 aa«kory to ba tastad. Tha abova tabla CAPT Exacution Tiaas) pivas seaa 

431 m*—urm^ tiaas. For any pattarts dalatad (through usa of tha Oavica 

4S2 Oascriptor Words) rafaranca saction 2.2 for individual oattam tiaas. 

455 
454 

455 NOTE 
4S« 

457 Tha tiaas givan in saction 2.2 ara for 

456 16K chunks of aaaory. not 12eK boards! 
459 

440 
441 

442 LONGEST TEST TIME: 

443 This parsiMtar should ba sat to tha axacution tiaa of tha longsat 

444 pattarn baing run. for tha dafault caaa this is 35 saconds for 

445 Pattarn nZ. 
446 

447 ADDITIONAL RUN TIME: 

446 Not Usad By Proflraa. 
449 

450 SOFTWARE ENVIRONMENT: 



451 For APT auto aod« this paraaatar should ba aat to a "1". For 

452 duap aoda sat this to a "0". 
453 

454 ENVIRONMENT MODE: 

455 Whan this paraaatar is sat to a "0" tha prograa doas it's omn 

456 sizing. If tha uaars sats bit *7 hOMavar. ha nust spacify tha typas 

457 and aneunta of aaaory to ba tastad. 
456 

459 SWITCH 1: 

460 Tha dafault satting of this switch is "10!". APT usas this as 

461 tha SMi'tch rag i star for tha program. Rafaranca ««ction 2.4.1 for Mora 

462 information on switch sattings. 
463 

464 SWITCH 2: 

465 This switch, if s««- tc any non-zmro nuabar. is usad to liait tha 

466 aaount of pasoaa APT will aaka. Tha prograa will hang aftar this 

467 count has baan raachad. 
466 

469 CPU OPTIONS: 

470 Not Usad By Prograa. 
471 

4 72 MEMORY TYPE n (n-1 to 4) 

4/5 If bit #7 of ENVIRONMENT MODE is sat thasa four wordo ara usad to 

474 log tha diffarant typas of Maaory to ba tastad. If bit 97 is not sat 

475 thasa location ara not usad. 

4 76 

4 77 MAXIMUM ADDRESS n (n-1 to 4) 
*?» 

4*4 Thasa four words ara usad in conjuntion with tha corraspond i ng 
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4»0 
481 
482 
483 
464 
483 
48« 
487 
480 
489 
490 
491 
492 
493 
494 
495 
496 
497 
490 
499 
500 
SOI 
502 
503 
504 
505 
506 
507 
500 
509 
510 
511 
512 
513 
514 
515 
516 
517 
510 
519 
520 
521 
522 
523 
524 
525 
526 
527 
520 
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nEHOftr TYP£ words to indicate tho highoot oddroao that 
occupioa. 



MOTE 

Th« abova tno paraaatara do not actually 
hava to rapraaant an accurata 
configuration of aaaery. All tha 
prograa loeka for ia an accurata tally 
of aaaory anount! 



SEQ 0012 



ry typa 



INTERRUPT VECTOR n (n-1 to 2} 

Not Uaad By Prograa. 

BUS PRIORZTT n (n-1 to 2) 

Not Uaad By Prograa. 

BASE ADDRESS: 

Not Uaad By Prograa. 

DEVICE MAP: 

Not Uaad By Prograa. 

CONTROLLER DESCRIPTOR CODE n 
Not Uaad By Prograa. 

DEVICE DESCRIPTOR COOES: 

Tha Davica Daacriptor codaa ara uaad by tha prograa to dataraina 
which pattarna it Mill run. Tha dafault valuaa of thaaa Mordo ara all 



Cn-1 to 2) 



pattarna 

l"'*, indicating that all of tha pattarna ahown 



axacutad 
controls • 

DD WORDS 

Uortfe 0-1 

Uertfo 2-3 

Uertfa 4-5 



in 

Coava for axcaptiona as notad thara). 
tabla in tha program aa folleiis: 

PROGRAM TABLE (Syabolic location) 

MKCSRT 

MKPAT 

njPAT 



oaction 2.2 ara 
Each aat of ttordo 



Bit 00 aat in tha firat word indicataa that tha firat pattam in tha 
tabla Mill ba axacutad. bit 01 tha aacond. bit «2 tha third.... bit 
00 of tha aacond Mord indicatas that tha 17th antry in tha tabla Mill 
ba axacutad. and so en. 



! 
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SEQ 0015 

5 SO 
S51 

353 
534 

535 

536 2.3.3 No S8E FrM Bwtka - 



If th« progrM cannot find any SBE (Singl* Bit Error) fro* location* 
(in non-protoctod ECC M«ory) it Mill print out an orror oaoaaa* and 
continM* toatina by-paaainfl tft* ECC logic toata. 



557 
538 
539 
540 
541 
542 
543 

544 2.S.4 Hixad Parity ECC Conf i Qurat i ono - 

545 

M6 Th* prograa Mill function normally in aixad anvironaant*. Th* 

347 ooquanc* of tooting aay aooo atrang* duo to tho rocuraiv* taat ~" 

346 algoritha (roforonco aoctiona 2.4.1.1. 2.4.1.2. 2.4.1.3). 

549 



J 
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SEQ 0014 



SSI 2.4 Prograa Option* 

552 
553 

554 2.4.1 SMftch Rogistcr Details - 

555 

556 If a hardMar* SMitch rao>*tar is not available than tha aoftMar* 

557 switch raaistar is in location 176. IF undar APT if BIT7 is sat in 
S56 tha E-TABLE symbolic location "tENVM" tha APT softwara SMitch raflistar 

559 Mill ba usad (location tSUREG). 

560 

561 To chanoa tha softwara switch rag i star contents: "^tP* "control G". 

562 This Mill causa display tha currant valua of tha SUR and proMpt for 

563 tha octal input of tha naM SUR valua from tha tarninal. This routine 

564 Mill ignore you (not respond to control "G") if you have a hardware 

565 SMitch register. 
566 

567 SU15 - HALT ON ERROR 

566 (100000) 
569 



S70 Continuina from this halt Mill first check for a change 

in the softMsre SMitch register ("Control G" in the Tit 
input buffer) then it Mill continue testing. 

573 



574 SU14 - LOOP ON TEST 

575 (40000) 
576 

577 This will cause looping on the present test oi pattern 

S7B (back to last scope trap). If in a pattern then the 

S79 looping Mill be for an entire bank of 16K addresses. 
580 

581 SU13 - INHIBIT ERROR TYPEOUTS 

582 (20000) 
583 

584 This Mill cause returns from the error routine Mithout 

585 the typed messages. Other on error functions are not 

586 affected. 
567 

588 SW12 - INHIBIT RELOCATION 

589 (10000) 
590 

591 Thia prevents the program from moving and consequently 

592 prevents the program from test i ng at least 32K of 

593 memory . 
594 

595 

596 sun - QUICK VERIFY 

597 (4000) 

599 If this SMitch is selected approximately one 64th of 

600 the possible combinations of SBE's OBE's are tested. 
601 

602 Each pass complete typeout will indicate this mode by 

603 preceding the pass number with "QV". 
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SEQ 0015 



605 SUlO - BELL ON ERROR 

606 (2000) 
607 

608 Ih'is causes a bell (or b««p or click) on each error 

609 trap 
610 

611 SU9 - LOOP ON ERROR 

612 (1000) 

614 This Mill causa loop i no from failure point back to the 

61^ last correctly initialized area of the current test. 
6)6 

617 sua - HALT PROGRAM 

618 (400) 
619 

620 This initiates the following sequence: 
621 

622 1- program is relocated it moves back to bank zero. 

623 

624 2. Flush out all possible 06E's. 
625 

626 3. Turns off Memory Management. 
627 

628 4* Restore loaders. 
629 

630 S. Unmap the Unibus Map Cif *-here is one). 
631 

632 6. Halt if under APT or ACT branch sei. 

633 

634 

636 SM7 - DETAILED ERROR REPORTS 

637 (200) 
ilB 

^39 After any normal error report is typed this option 

^40 causes the contents of the f el lowing registers to be 

&41 typed: 

542 RO. Rl. R2. R3. R4. R5. SP, "CONTROL". "CPUERR" 

544 SU6 - INHIBIT CONFIGURATION MAP 

&45 (100) 

&46 

^47 This inhibits the printing of a map showing the memory 

^48 configuration - rc'erence section 7 3 

tso SU5 - LIMIT MAX ERRORS PER BANK 

«1 (40) 

i52 

lii This will limit the number of error typeouts per bank. 

554 The default is 10. DECIMAL, however this can I:* 

555 changed by changing location "ERRMAX" manually. 
^56 
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SEQ 0016 



656 SU* ' FAT TE9HINAL 

659 C20) 

661 This infoms th« program that the console terminal has 

662 a Midth of at least 132 columns (LA36 Mith wide paper). 
66S 

664 

665 SU3-1 - TEST HOOE 
666 

667 Test Modas datarnina tha racurcion algorithm to ba usad 

666 during pattern taata. 
669 

670 MODE NAME DESCRIPTION 

671 

672 (0) 0 BAFPAF Banks foritard. patterna forward 

675 C2) 1 BAFPAR Banka forward, patterna revarac 

674 C4) 2 BAUPAF Banks worst first, patterns forward. 

675 (6) 5 BAUPAP Banks worst first, patterns reverse. 

676 CIO) 4 PAFBAF Patterns forward, banks forward 

677 C12) 5 PAFBAU Patterns forward, banks worst first 

678 C14) 6 PARBAF Patterns reverse, banks forward 

679 (16) 7 PARBAU Patterns reverse, banks worst first. 
660 

681 For more details reference section 2.4.1.1. 2.4.1.2 and 

662 2. 4.1. J. 

683 

684 SUO - DETECT SINGLE BIT ERRORS (SBE's) 

665 (1) 
686 

667 For manufacturing purposes this switch should alwaya be 

666 on. For field service purposes this switch should 
689 always be off. 

690 

691 This switch will allow all ECC Single Bit errors to be 

692 reported by disabling error correction. 
693 

694 Error printouts of SBE's are not distinguishable from 

695 DBE's. 
696 

697 

696 NOTE 
699 

700 Double Bit Errors arc found in the memory, 

701 this switch should be set to make sure that new 

702 data can be written to the DBE locations. 
703 

704 
705 
706 

707 2.4.1.1 Test Mode Example - 

706 

709 Example analysis of mode 5 "PAFBAU". Assume Panks 0 1 are MSVll-J 

710 and Banks 2.3.4. 5 arc MSVll-L. 
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712 AssuM also that Bank 3 ia known bad by the program via th« aiz 

7^3 poutina or pravloua runa Tha taat!ng aaquanca Mould b« aa follOMa: 

715 jTEST MSVll-J MEMORY TYPES FIRST 

7X6 (TEST KNOWN BAD MEMORY (BANK 3) 

718 TEST X7. BANK 3 

719 TEST 7. BANK 3 

720 TEST X. BANK 3 
72X TEST 2. BANK 3 

722 TEST 4 BANK 3 

723 TEST 5, BANK 3 

724 TEST 21. BANK 3 

725 TEST 20. BANK 3 

726 TEST 22. BANK 3 

727 TEST 26. BANK 3 
726 

729 ;TEST PRESUMED GOOD MEMORY (BANKS 2.4.5) 

730 
731 
732 
733 
734 
735 
736 
737 
738 
739 
740 
741 
742 
743 
744 
745 
746 
747 
746 
749 
750 
75X 
752 
753 
754 
755 
756 
757 
756 
759 
760 
76 X 
762 
763 



TEST 


17. 


BANK 


2 


TEST 


7. 


BANK 


2 


TEST 


1. 


BANK 


2 


TEST 


2. 


BANK 


2 


TEST 


4. 


BANK 


2 


TEST 


5. 


BANK 


2 


TEST 


21. 


BANK 


2 


TEST 


20. 


BANK 


2 


TEST 


22. 


BANK 


2 


TEST 


26. 


BANK 


2 


TEST 


17. 


BANK 


4 


TEST 


7. 


BANK 


4 


TEST 


1. 


BANK 


4 


TEST 


2. 


BANK 


4 


TEST 


4. 


BANK 


4 


TEST 


5. 


BANK 


4 


TEST 


21. 


BANK 


4 


TEST 


20. 


BAM< 


4 


TEST 


2Z. 
26. 


BANK 


4 


TEST 


BANK 


4 


TEST 


17. 


BANK 


5 


TEST 


7. 


BANK 


5 


TEST 


1. 


BANK 


5 


TEST 


2. 


BANK 


5 


TEST 


4. 


BANK 


5 


TEST 


5. 


BANK 


5 


TEST 


21. 


BANK 


5 


TEST 


20. 


BAM< 


5 


TEST 


22. 


BANK 


5 


TEST 


26. 


BANK 


5 
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SEQ 0010 



765 

766 {RELOCATE TEST PROGRAM SPACC (BANK 0 £ 1) 

767 

768 TEST 1. BANK 0 

769 TEST 2. BANK 0 

770 TEST 3. BANK 0 

771 TEST 4. BANK 0 

772 TEST 5. BANK 0 

773 TEST 26. BANK 0 

774 TEST 1. BANK 1 

775 TEST 2. BANK 1 
7-i TEST 3. BANK 1 

777 TEST 4. BANK 1 

778 TEST 5. BANK 1 

779 TEST 26, BANK 1 
780 

782 NOTE 
783 

784 This is an example not an actual 

785 sequence . 

786 
787 

788 The test sequence Mas forMard (the simple patterns first, complex 

789 tests last) sequence of patterns (MSVll-L - 17, 7, 1, 2, 4. 5. 21. 

790 20. 22. 26)(MSV11-J - 1. 2. 3, 4, 5. 26). 
791 

792 If the bank selection is forward the banks Mill be tested in the 

793 folloMing order: 
794 

795 1. ECC banks that are not protected or program space (from 0 to 

796 167). 
797 

798 2. Parity banks that are not program space (from 0 to 167). 

799 

800 3. The program now relocates tests: 

801 

802 4. ECC banks that Mere protected or program space (from 0 to 

803 167). 
804 

905 5. Parity banks that Mere program space (from 0 to 167). 

806 

807 If bank selection is Morst first the configuration table m!11 be 

808 consulted and banks Mill be tested in the folIoMing order. 
809 

810 1> ECC banks that are knoMn bad and are ."^t protected or program 

611 space (from 0 to 167). 

812 

813 2. Parity banks that are knoMn bad and are nvt program space 

814 (from 0 to 167). 
815 

816 3. ECC banks that are presumed good and are not protected or 
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SEQ 0019 



818 

819 progrM spac* (fro* 0 to 167). 

820 

021 4. Parity banks thoc arc prasunad good and ara not progra* apaca 

822 (from 0 to 167). 

823 

824 5. Tho progra« now ralocatas testa; 

625 

826 6. ECC banks that ara knoim bad and Mara protactad or progra* 

827 spaca (fro* 0 to 167). 
828 

829 7. Parity banks that ara knoMn bad and Mara progran spaca (fro« 

850 0 to 167). 

831 

832 6. ECC banks that arc prcauMd good and Msra protactad or 

833 progra* space (from 0 to 167). 
834 

635 9. Parity banks that ara prasumcd good and Mcrc program spaca 

636 ifrem 0 to 167). 
637 

es6 

639 2.4.1.2 Tast Moda Octaila • 

640 

641 MODE 0 - "BAFPAF" banks forMard. patterns forMsrd 

642 

643 This is tha default and siaplest mode. 

644 

645 This mode tests each bank completely from 0 to 167 

646 except thoae requiring relocation*. 
647 

646 While teat i no each bank the patterna are run Mith the 

649 simple ones first building to the more complex. 

650 

651 nOOE 1 - "BAFPAR" - banks foPMSPd. patterns reverse 

652 

653 This mode tests each bank completely from 0 to 167 

654 except those requiring relocation*. 
655 

656 While testing each bank the patterns are run with tha 

657 moat complex onea first, working to the simple ones. 
856 

659 MODE 2 - "BAWPAF" - Banks Morst first, patterns forMard 

660 

661 This mode first tests each knoMn bad bank completely 

662 from 0 to 167 except those requiring relocation*, then 

663 presumed good banka are tested from 0 to 167 except 

664 those requiring relocation*. 
665 

666 While testing each bank the patterns are run Mith the 

667 simple ones first, building to the more complex. 
666 

669 nOOE 3 - "BAWPAR" « Banks *.i»r9t rirst. patterns reverse 

670 

671 This mode f ii-«t "-.sts each knOMn bad bank completely 
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SEQ 0020 



873 fro«» 0 to 167 oxcopt tho«« requiring relocation*, than 

074 praauMad good banka ara taatad from 0 to 167 axeapt 

075 thoaa raquiring ralocation*. 
876 

077 Uhila taating aach bank tha pattarna ara run Mith tha 

070 Moat coMplax onaa firat. Morking to tha aiapla onaa. 

879 

000 MODE 4 » "PAFBAF" » Pattarna forward, banka forward 

881 

002 Thia »eda taata each pattarn complataly with tha aiapla 

003 onaa firat, buildine to tha mora eoaiplax. 
884 

005 Uhila taatinp aach pattarn tha banka ara run fro« 0 to 

006 167 axcapt tnoaa raquiring ralocation*. 
887 

868 

009 nOOE 5 ■ "PAFBAU" - Pattarna forward, banka worat first 

890 

091 Thia moda taata aach pattarn coaplataly with tha aiapla 

092 onaa firat, building to tha mora complax. 
893 

094 Uhila taating aach pattarn firat aach known bad bank 

095 from 0 to 167 axcapt thoaa raquirino ralocation* ia 

096 run. than praaumad good banks ara run From 0 to 167 

097 axcapt thoaa raquiring ralocation*. 
898 

099 nOOE 6 - "PARBAF" - Pattarna Ravaraa. Banks Forward 

900 

901 This moda taata aach pattarn complataly with tha most 

902 complax onaa first, working to tha aimpla ones. 
90S 

904 Uhila tasting aach pattarn tha banks ara run from 0 to 

905 167 axcapt thoaa raquiring ralocation*. 

906 

907 MODE 7 ■ "PARBAU" - Pattarna Ravaraa. Banks Worst First 

908 

909 This moda taata aach pattarn complataly with tha moat 

910 complax onaa first, working to tha simpla onas. 
911 

912 Uhila taating aach pattarn f i at aach known bad bank 

913 from 0 to 167 axcapt thoaa that raquira ralocation* is 

914 run, than praaumad ^ood banks ara run from 0 to 167 

915 axcapt thosa raquiring ralocation*. 
916 

910 NOTE 
919 

920 * Ralocation ia raquirad to taat tha 

921 bank(s) in program apaca and alao to 

922 taat any ECC banks protactad by 

923 diagnostic chackmoda with tha inhibit 

924 moda pointar off (zaro)! 
925 
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SEQ 0021 



927 
926 
929 
9S0 
931 
932 
933 

934 2.4.1.3 TMt Hod* Applications - 

935 

9S« 

937 1. To varify corract oparation of tha MaMOPy aystam uaa Moda 0 

938 "BAFPAF - . 
939 

940 Advantagaa: Easy to undaratand. 

941 

942 Oiaadvantagaa: In caaa of a failing Bank, it may taka a long 

943 tiaa to find tha failura. 
944 

945 2. To gat data i lad arror infornation on known bad Banka (found 

946 by aizing poutina) uaa rieda 2 "BAUPAF". 
947 

948 Advantagaa: Saaka Bad Banks. Easy to undaratand. 

949 

950 Oiaadvantagaa; Failuraa othar than zaroa onaa «ay taka a 

951 long tiaa to find. 
952 

953 3. To gat good mrror info on any maMory problam fast usa Moda 4 

954 -PAFBAF'T 
955 

956 Advantagaa: Covara all banks fast. Easy to undarstand. 

957 

958 Oiaadvantagaa: Failuraa from only coaiplax pattarns may taka 

959 a long tiaa to find. 
960 

961 4. To find any problaa faat uaa Moda 7 "PARBAU". 

962 

963 Advantagaa: Covara all Banka faat. 

964 

965 D i sadvantagas : Difficult to undarstand failuraa raportad ara 

966 not nacassarily tha most baaic failura modas. 
967 
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969 
970 
971 
972 
973 
974 
975 
976 
977 
978 
979 
9S0 
981 
982 
983 
984 
985 
986 
987 
988 
989 
990 
991 
992 
993 
994 
995 
996 
997 
998 
999 
1000 
1001 
1002 
1003 
1004 
1005 
1006 
1007 
1008 
1009 
1010 
1011 
1012 
1013 
1014 
1015 
1016 
1017 
1018 
1019 
1020 
1021 
1022 
1023 
1024 



2.4.2 SoftMsr* Snitch register - 

A softMsr* •witch register exists in location 174. 

2.4.3 Special Heaory Locations - 
2.4.3.1 CACHE Constant - 

The CACHE constant ia located at synbolic location "CACHK" and ia used 
to enable CACHE. 



Bit 0 
effect 
by the 
enable CAC 



NOTE 

in the CACHE constant has no 
since it is unconditionally set 
program whenever it tries to 



2.4.3.2 Configuration Table 

The configuration table is located at syabolic location 
has the following format: 



"CONFIG" and 



CONFIG: 



First 16K Configuration words (2 each) 
2nd 16K Configuration words (2 each) 



200th 16K configuration words (2 each) 



Configuration Uorda: 
LOU: 



BIT 0 ERRORS PRESENT 

BIT 1 riEMORr EXISTS 

BIT 2-4 RESERVED 

BIT 5 SKIP ECC LOGIC TESTS FLAG (1-SKIP) 

BIT 6 PROTECTED REGION OF AN FCC MEMORY 

BIT 7 PROTECTED (PROGRAM SPACE) 

BIT 8-11 CSR CODE 
BIT 12-15 RESERVED 

MED: BIT 0-7 NUMBER OF ERRORS 

BIT 8-10 MEMORY TYPE 

BIT 11 CSR TESTED OK 

BIT 12 RESERVED 

BIT 13 -BACKGROUND PATTERN VALID" FLAG 

BIT 14 BANK SELECTED FOR TEST BY FIELD SERVICE MODE 

BIT 15 LOADERS HOME BANK 

This table is used as the aource for the configuration 
Map (reference, section 7.3). 
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SEQ 0023 



1026 
1027 
1028 
1029 
1030 
1031 

1032 2.4.4 TcrMinal CoMiianda - 

1033 

1034 

1056 2.4.4.1 Control "C" 

1037 

1038 This coMiand Mill: 

1039 

1040 1* SMitch 8 (Halt Program) in the SMitch ragiatar ia aat halt 

1041 tha prograM. 
1042 

1043 2. If Sititch 8 ia not aat. unralocata if program Maa ralocatad. 

1044 

1045 3. Fluah out any OBE'a. 

1047 4. Turn off MaMory Managamant. 

1048 

1049 5. HALT 

1050 

1051 

1052 Thia coMiand Mill only ba racognizad at the complation of the currant 

1053 taat or pattarn, or at tha and of a lina of an error maaaag*. 
1054 

1055 

1056 2.4.4.2 Control "K" (Kill mrror printout and akip pattarn) 

1057 

1058 Thia coamand Mill allOM you to atop an trror printout and akip to tha 

1059 naxt pattarn. Thia ia hardy, for axampla. Mhan you hava a Mhola bank 

1060 full of arrora. hava gotten enough information, and Miah to akip to 

1061 the next pattern. 
1062 

1063 

1064 2.4.4.3 Control "T" (Tell me Mhat'a happening) 

1065 

1066 Thia command Mill print out the information encoded in the diaplay 

1067 ragiatar. Thia ia mainly intended for CPU'* Mithout a hardMare 

1068 display ragiatar. 
1069 

1070 Example: 

1072 BANK - 17 TEST > 46 

1073 RELOCATED BANK- 0 PAT- 26 
1074 

1075 

1076 By uae of Field Sarvice Command 17 "Traca" can ba aat eo that it Mill 

1077 automatically type out the bank and pattern numbera as each pattern i* 

1078 run. (R*f*r*nc* s*ction 2.4.4.8.18). 
1079 
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SEQ 00?4 



loei 

1082 

loes 

1084 

1085 
1086 
1087 

1088 2.4.4.4 Control "S" (Stop) 

1090 This eoMMnd Mill stop typoout (soon) and Mill Mait for a Control "Q'. 

1091 

1092 

1093 

1094 2.4.4.5 Control "Q" (Quintinua) 

1095 

1096 Thia ee««and Mill continu* typing that haa baan atoppad by Control 

1097 "S". If thara haa baan no Control "S" typad than thia cownand ia 

1098 ignorad. 
1099 

1100 

1101 2.4.4.6 Control "F" (Fiald Sarvica Moda) 

1102 

1103 Thia coMiand Mill cavaa you to tyfr a moda Mhich looka for aub 

1104 eoMiandu. 

1105 

1106 Uhan tha progran ia looking for a aub coMnand any nuabar that la not a 

1107 lagal coMand Mill cauaa a aini halp naaaage to ba typad. Tharafora 

1108 Mhan in doubt typa 99 (CR) and you Mill gat halp. 
1109 

1111 NOTE 

1113 Typing juat carriaga raturn ia a dafault 

1114 coMnand 0. 
1115 

1116 
1117 
1118 
1119 

1120 2.4.4.7.1 Fiald Sarvica Co— and 0 (Exit) 

1121 

1122 Thia eowiand will ax it Fiald Sarvicaa Moda and raturn to Mhata var taak 

1123 it Maa in prior to typing control "F". Nota typing juat carrir 

1124 raturn ia a dafault Cowiand 0. 
1125 
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SEQ 0025 



L27 
L2S 
L29 

L50 
L51 

[s5 2.4.4.7.2 Fi«ld S«rvic« CoMMod 1 (R«ad CSR) 

L54 

L35 This ee«Mnd Mill typcout th» contents of ths CSR. 

L96 

L37 If th«r« is aers than on* CSR on tho CPU (or if tho proflrM has not 

L38 tf«t«r«in«d th« CSR status y«t). it Mill Ask you -UHICH CSR(O-F)- to 

159 Mhlch you aust respond Mith an HsxideciMl nuiibar fro* 0 to F. Nets 

L40 typing Just esrriaos return is a default 0. 

142 If the CSR you select causes a trap to 4 the proflraa Mill type -THIS 

L43 CSR ODES NOT EXIST". 

144 

L46 NOTE 

I4S CSR references sre dene in accordance 

149 Mith section 5.0. 

L50 

L51 

L52 

154 2.4.4.7.3 Field Service CoiMwnd 2 (Load CSR) 

[sl Thia coMsnd Mill enable you to load the CSR. 

LSa If there ia aere than one CSR on the CPU (or if the proaraa haa not 

159 y«t deterained the CSR atatus yet) it Mill aak you -UHICH CSR(O-F)" to 

160 Mhich you aust respond Mith an Hexideciaal nuaber frea 0 to F. Note 
[61 typing just csrriaga return ia a default 0. 

L62 

163 If the CSR you aelect causes a trap to 4 the proflraa Mill type "THIS 

L64 CSR DOES NOT EXIST". 

L65 

66 The CSR Mill be read and displsyed as in coaaand 1. 

67 

68 The prograa Mill then ask you for the "CSR?" to Mhich you aust respond 

69 Mith an Octal nuaber. Note typing Juet carriage return is a default 

70 0. 

72 The prograa Mill then load the CSR and Read it again diaplaying its 

[73 noM contents. 

L74 

L75 
L76 
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S€Q 00?« 



1176 
1179 
USO 

uei 

XitS 2.4.4.7.4 Fi«ld S«rvic« Co — r»d S (Exaain* Maaory) 
1194 

lltS This coaaand Mill alloa you axaaina any physical addrass and deaa 

llM tha rfcm—mry memory aanagaaant mapping for you. 

ilM TKa prooraa Mill aak you for tha -PHYSICAL ADDRESS (0-17757776)- to 

1169 Mhich you auat raapond Mith an Octal nuabar. 

1190 

1191 If tha addraas accass cauaaa a trap to 4 tha prograa Mill typa 

1192 -TIMEOUT TRAP". If tha addrasa aceaaa cauaaa a trap to 114 tha 

1193 pro«raa Mill typa -PARITY ABORT-. 
1194 

1195 Tha eentanta of your physical addraaa Mill ba typad. 
1196 

1197 

1196 2.4.4.7.5 Fiald Sarvica Coaaand 4 (Modify Maaory) 
1 X99 

1200 This coaaand alloMS you to aodify any phyaical addraaa and doaa tha 

1201 nacaasary aaaory aanao a aa n t aapping for you. 



1201 nacaasary aaaory aanagaaant aapping for you. 

ifof Tha prograa Mill aak you for tha -PHYSICAL ADDRESS (0-17757776)- to 

1204 Mhich you auat raapond Mith an Octal nuabar. 

1205 

1206 X' tha addrass accass cauaaa a trap to 4 tha prograa Mill typa 

1207 -TIMEOUT TRAP". If tha addrass accass cauaaa a trap to 114 tha 
1206 prograa Mill typa -PARITY ABORT-. 

1209 

1210 Tha prograa Mill typa -OLD DATA WAS" and tha contants of your physical 

1211 m<idr*9». 
1212 

1213 Tha prograa Mill than typa -INPUT NEW DATA- to Mhich you auat raapond 

1214 Mith an Octal nuabar. Nota typing juet carriaga ratum is a dafault 

1215 0. 
1216 

1217 Tha prograa Mill attaapt to Mrita this nsM data into your physical 

1216 addraaa aftar Mhich it Mill raad it again and typa -DATA IS NOU' 
1219 tha naM contants of your physical addrass. 

1220 
1221 

122? MOTE 
122S 

1224 If you can't changa tha data, that Mould 

1225 indicata that you hava a Doubla Bit 

1226 Error in that doUbla Hord pair. 

1227 
1226 
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1250 
12S1 
12S? 
12SS 
12S4 

X2S6 2.4.4.7.6 Fiald Service CoiMiand 5 (Select Bank Teat) 

1298 Thia cotmaand allOMa you to run any liank with any pattern forever. 

1239 

1240 The program will aak you •'BANKCO-177)" to which you wuat reepond with 

X241 an Octal number. If the bank i* not acceaaible. The program will 

1242 type "BANK NOT ACCESSIBLE" and aak queation over. 

1244 The program will then aak "TEST (0-47)" to which you muat reapond 

1245 with an Octal number. 
1246 

1248 NOTE 
1249 

1250 Any pattern can be run including thoae 

1251 that are not part of the APT E -TABLE 

1252 default* (reference section 6.2.1). If 

1253 you **l*ct Pattern 0, the program will 

1254 aak "TEST 0 DATA IS?" to which you 

1255 mu*t r**pond with an Octal numbar. 
1256 

1257 
1258 

1259 If th* Bank you •elected require* relocation the prograai will type 

1260 "BANK REQUIRES RELOCATION" and exit thi* command. Note normally this 

1261 i* tru* for Bank 0. 
1262 

1263 Th* program will than arm th* consol* k*yDoard for intarrupts and typ* 

1264 "TO ESCAPE TYPE ANY KEY!". 
1265 

1266 Th* t**t pattarn will b* *nt*r*d and run until a consol* k*y i* 

1267 d*pr****d to **cap* this loop. 
1268 

1269 

1270 

1271 2.4.4.7.7 Field Service Command 6 (Type Configuration Hap) 

1272 

1273 This command types the configuration map. 

1275 Thi* i* u**ful •ft*r a long run (ovarnight) to *** *11 th* banks that 

1276 marked as bad. (Especially if your consol* is a vidao torminal). 

1278 For a data! led explanation of the map reference section 7.3. 

1279 
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1261 
1282 
1283 
12S4 
1285 
128« 
1287 
1288 
1289 
1290 
I2'»l 
1292 
1293 
1294 
1295 
1296 
12'>7 
1298 
1299 
1300 
1301 
1 302 
ISOS 
1304 
1505 
1306 
1307 
1308 
1309 
1310 
1311 
1312 
1313 
1314 
1315 
1316 
1317 
1318 
1319 
1320 
1321 
1322 
1323 
1324 
1325 
1326 
1327 
1328 
1329 
1330 
1331 
1332 
1333 



2.4.4.7.6 Field Service CoMnand 7 (SOB-A-LONG TEST) 



This ccMMiand alloMS execution of the SOB-A-LONG Test on all 
non -protected Banks reference Section 6.2.2.26. Operation I* 
identical to co«Miand 5 except that no Pattern or Bank is entered and 
each paaa cauaea a Bell. 

2.4.4.7.9 Field Service CoMnand 8 (Error SuMnary) 



Thia coiMiand typea out the nuaber of paaaea and the total nunbar of 
errora. If there were any errora it Mill type out the Banka and the 
number of trror* per bank up to 255 DECIMAL. 

Thia becomes useful after long runs (all night) on ayatems with a 
video console terainal. 



2.4.4.7.10 Field Service Command 9 (Refresh TEST) 

This command alloMa execution of the Refresh Test on all non-protected 
Banka reference Section 6.2.2.19. Operation is identical to command 5 
except that no Pattern or Bank is entered and each pass cauaea a Ball. 



2.4.4.7.11 Field Service Command 10 (Sat Fill Count) 

This command alloMS setting of the terminal fill count (necessary for 
LA30's, ASR33'<i. and VT05'a). It is normally set to zero for LA36's. 
VT52's. VTlOO's. ate. 



2.4.4.7.12 Field Service Command 11 (Enter Kamikaza Mode) 

Thia command allOMS you to run patterna that are normally not executed 
unieae under APT or ACT. They are uaually very time consuming and can 
result in failures that are fatal to the program. In effect you are 
trying to find a hardware failure regardless of the consequences. 
Note that most crashes do not wipe out the display information ithich 
is telling you ithat the program Mas doing just prior to failure. 
There are two Mays to die here • Impatience and Craahes. 
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SEQ 0029 



155S 
1336 
1337 
1338 
1339 
1340 

1342 2.4.4.7.13 Field Service CouMtand 12 (Exit KMi!kaz« Mod*) 

1344 Return to the default »ode of teating (undo CoflMand 12). 

1345 

1346 

1347 2.4.4.7.14 Field Service CoflMnand 13 (Turn Cache Off) 

1348 

1349 This change* the Cache conatant to bypaaa each* (r*f*r*nc* aaction 

1350 2.4.3.1). 
1351 

1352 
1S53 
1S54 

1555 2.4 4.8.15 Fi*ld S*rvic* Command 14 (Turn Cach* On) 

1356 

1SS7 Thi* Chang** th* Cach* constant to us* cach* (r*f*r*nc* aaction 

1358 2.4.3.1). 

1359 

1360 

1S61 

1362 

1S6S 2.4.4.7.16 Fiald S*rvic* Command 15 (T**t Only S*l*ct*d Banka) 

1S64 

1365 This command alloMS you to c*nt*r th* t**t *ffort on only thos* banka 

1366 that you ar* trouel**heot ing. You may alao t**t banks that raquir* 

1367 r*location and M*r* inaccassabi* via command 5. 
1368 

1369 
1370 

1372 2.4.4.7.17 Fiald S*rvic* Command 16 (Rasume Testing All Banks) 

1373 

1374 Raturn to th* d*fault mod* of tosting (undo Command 15). 

1S75 

1376 

1377 

1378 

1379 2.4.4.7.18 Fiald Scrvic* Command 17 (Resume Testing All Banks) 

1380 

1361 Enable "Trace". After exiting field service mode, the program Mill 

1382 type out th* bank and pattern numbers as each pattern is run. 

1383 

1384 

1385 

1386 

1387 2.4.4.7.19 Field Service Command 18 (Resume Testing All Banks) 

1388 

1389 Disable "Trace", (undo Command 17). 

1390 
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SEQ 0050 



1392 
1393 
1394 
1395 
1396 
1397 

1398 2.5 Execution Tines 

1399 

1400 2.5.1 Typical (System) - 

1401 

1402 Execution tinic depends on many variables! hoMSver here are some 

1403 measured times on an 11/23B: 
1404 

1405 

1406 K Mords of MSVll-J Memory 

1407 Normal Pass Min Sec 
1406 Quick Verify Min Sec 

1409 Kamikaze ttode flin Sec 

1410 Kamikaze QV Min Sec 
1411 

1412 K Mords of MSVll-L Memory 

1413 Normal Pass Min Sec 

1414 Quick Verify Min Sec 

1415 Kamikaze Mode Min Sec 

1416 Kamikaze QV Min Sec 
1417 

1416 K Mords of MSVll-P Memory 

1419 Normal Pass Min Sec 

1420 Quick Verify Min Sec 

1421 Kamikaze Mode Min Sec 

1422 Kamikaze QV Min Sec 
1423 

1424 
1425 
1426 

1427 2.S.2 Calculations (System) 

1426 

1429 Normal Pass 

1430 Add Sec per 16K BANK of MSVll-P 

1431 Add Sec per 16K BANK of MSVll-L 

1432 Add Sec per 64K BANK of MSVll-J 
1433 

1434 Quick Verify Pass 

1435 Add Sec per 16K BANK of MSVll-P 

1436 Add Sec per 16K BANK of MSVll-L 

1437 Add Sec per 64K BANK of MSVll-J 
1436 

1439 Kamikaze Mode 

1440 Add 10 min. per 128K Mords for approximate pass times. 
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1 AAA 








\AA% 








1 AA/t 








1447 








1 AAA 














1450 


T*«t 

■ WW V 






1451 












1452 








A^ J J 


MTOOOO 

III WW 


1 < 1 SEC 


DATA PATTERN TEST 


1454 


MTOOOl 


i<l SEC 


ADDRESS TEST 


1455 


nT0002 


i<l SEC 


COHPLEnENT ADDRESS TEST 


1456 


nT0003 


, 1 SEC 


S XOR 9 UORST CASE NOISE TEST 


1457 


nT0004 


1 1 SEC 


ROTATING ZEROS TEST 


1458 


I1T0OOS 


1 1 SEC 


ROTATING ONES TEST 


1459 


nT0006 


i<l SEC 


INITIAL DATA TEST 


1460 


f1T0007 


i<l SEC 


ADDRESS BIT TEST 


1461 


MTOOlO 


,<1 SEC 


BYTE ADDRESSING TEST 


1462 


nT0014 


, 1 SEC 


BASIC DOUBLE BIT ERROR TEST 


1463 


MT0017 


j<l SEC 


HOLDING I'S O'S TEST 


1464 


HT0020 


1 1 SEC 


SYNOROflES TO CSR ON SINGLE BIT ERROR TEST 
MARCHING O'S I'S TEST 


1465 


f1T0021 


1 1 SEC 


1466 


MT0022 


«10 SEC 


REFRESH TEST 


1467 


MT0023 


ilO SEC 


SHIFTING DIAGONAL TEST 


1468 


nT0024 


t20 SEC 


FAST GALLOPING PATTERN TEST 


1469 


nT0026 


i<l SEC 


RANDOM DATA TEST 


1470 


MT0027 


1 1 SEC 


UNIQUE BANK TEST 


1471 


nT0030 


t 1 SEC 


FLUSH OUT DBE'S TEST 


1472 


MT0031 


1 3 SEC 


SOB -A -LONG TEST 


1473 


MT0032 


j«l SEC 


WRITE RECOVERY TEST 


1474 


HT0033 


i35 SEC 


BRANCH GOBBLE TEST 


1475 


MT0034 


j<l SEC 


SOFT ERROR TEST 


1476 


MT0035 


i<l SEC 


WORST CASE PARITY TEST 


1477 


nT0036 


i 1 SEC 


CORRECTION CODE TEST 


1478 


MT0037 


i<l SEC 


CHECK ECC DISABLE TEST 
ADDRESS TO CSR ON OBC TEST 


1479 


MT0041 


1 1 SEC 


1480 


f1T0042 


I<1 SEC 


EXTENDED ADDRESS TO CSR ON ERROR TEST 


1481 


f1T0043 


i<l SEC 


WRITE BYTE TEST 


1482 


nT0044 


1 5 SEC 


SHIFTING CHECKBITS THROUGH CSR TEST 


1483 


MT0045 


i<l SEC 


SYNDROME BITS TO THE CSR ON A DBE TEST 


1484 


nT0046 


i 1 SEC 


CHECK SINGLE BIT ERRORS WITH ECC DISABLED 


1485 


MT0047 


i<l SEC 


NO CSR UPDATE WITH EXISTING DBE TEST 


1486 
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SEQ 00S2 



1406 
14S9 
1490 
1491 
1492 
1495 
1494 
1495 
1496 
1497 
1499 
1499 
ISOO 
1501 
1502 
1503 
1504 
1505 
1506 
1507 
1506 
1509 
1510 
1511 
1512 
1513 
1514 
1515 
1516 
1517 
1516 
1519 
1520 
1521 
1522 
1523 
1524 
1525 
1526 
1527 
1526 
1529 
1530 
1531 
1532 
1533 



3.0 ERROR INFORMTION 

3 . 1 Eppop R«port i 

Host cppors mrm p«port«d using the EMT tPap and handlap ppovidad by 
SYSMACSHL. float appops Mill ba of tha "rCMORY DATA ERROR" typa Mhich 
Mill b« daacpibad hapa. riEnORY DATA ERRORS Mill alao causa tha bank 
to ba aapkad as Bad in tha conf igupation tabla. 

Othap appoPS apa bast axplainad by pafapancing tha spacific typaout 
and if naeaaaapy tha ppogpa* listing. 

nEMoSY DATA ERROR 

PC BANK VAOO PAOO GOOD BAD XOR CSR nTYP PAT 

022132 37 060006 03700006 000000 000100 000100 0 E 06 

022132 37 060006 03700006 000000 000100 000100 0 E 06 

022132 37 060006 03700006 000000 000100 000100 0 E 06 

022132 37 060006 03700006 000000 000100 000100 0 E 06 

Uhila tasting Bank 37 at viptual addpass 60006 (viptual addpassas apa 
alMays batwaan 60000 and 1S7776 fop mapping pupposas), physical 
addpass 3700006 (that 'a Bank 37 physical 6 Mi thin tha Bank) Mith 
Pattapn 6 (Initial Data Tast), tha good data axpactad was 0 but tha 
data actually paad (BAD) Maa 100. tha axcluaiva OR at Good Bad 
ialds 100 Mhich indicatas only failing bit(s) (Bit 6). It is an 
SVll-J (ECO Mamopy. Tha CSR is iocatad at 172000. 



HEHoIy data ERROR 

PC BANK VAOO PAOO GOOO BAO XOR CSR HTYP PAT 

022132 35 060000 03500000 000000 000001 000001 0 E 06 

022132 35 060002 03500002 000000 000100 000100 0 E 06 

022132 35 060006 03500006 000000 000100 000100 0 E 06 

Uhila tasting Bank 35. viptual addpaas 60000. phyaical addpass 3S00000 
Mith Pattapn 6 (Initial Data Tast). tha good data axpactad Maa 0 but 
tha data actually paad (BAO) Maa 1. tha axcluaiva OR at Good Bad 
yialda 1 Mhich indicatas only failing bit(s) (Bit 0). It is an nSVll-J 
(EcC) nainopy and tha CSR is iocatad at 17200C. 



NOTE 

Subsaquant appoPS of tha 
not typa a naM haading. 



saaia tast do 
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SEQ 0053 



1535 




1536 


3.2 Error 


1537 


1538 




1539 


Th« folloMi 


1540 


1541 


• OF ERRORS 


1542 


1ST AOO 


1543 


ARRAY 


1544 


APT# 


1545 


APTCORE 


1546 


APTMOS 


1547 


BAO 


1548 


BAO-UOl 


1549 


BA0-U02 


1550 


BAO-CHK 


1551 


BANK 


1552 


BO-CC 


1553 


CHKBITS 


1554 


CONTRL 


1555 


CPUERR 


1556 


CSR 


1557 


CSRfK) 


1558 


OATARG 


1559 


QBE 


1560 


OEV ADD 


1561 


ECC 


1562 


GD-CC 


1563 


GD-CHK 


1564 


60-WDl 


1565 


G0-WD2 


1566 


GOOD 


1567 


LSXZE 


1566 


HEMERR 


1569 


MMRO 


1570 


MMRl 


1571 


Mt1R2 


1572 


flMRS 


1573 


MTYP 


1574 


rADO 


1575 


PAT 


1576 


PC 


1577 


SBE 


1578 


VAOD 


1579 


UROTEl 


1580 


UR0TE2 


1581 


XOR 


1582 


AUT 


1583 





i* a list of all abbreviations used in error roport*. 

Nu«b«r of Errors that M«r« dataetad. 
First Addrass that fa! lad. 

Tha array nu«bar that Mas lockad up in tha HSll-H CSR. 
Tha • of CPU's APT axpacts on tha systam. 
APT Cora siza. 
APT nOS siza. 
Bad data. 

Bad Word *1 of a doubla Mord data valua. 
Bad Uord #2 of a doubla word data valua. 
Bad Chack Coda Bits. 

Tha Bank nuabar. Banks ara 16K Mords long. 
Bad Chack Coda Bits. 

Tha 7 bit valua of tha Chack Coda Bits. 

Tha CACHE Control rasistar. 

CPU Error rag i star. 

Control and Status Rag i star. 

CSR NUMBER (0-F Haxidacinal). 

Tha CACHE Data Rao i star. 

Doubla Bit Error Cuncorraetabla •rrer'), 

Davica Addrass. 

Error Corractabla Coda. 

Good Chack Coda Bits. 

Good Chack Coda 3 its. 

Good Word •I of a doubla Mord data valua. 

Good Word #2 of a doubla Mord data valua. 

Good data. 

nSVll-J Siza. 

Manory Error rasistar. 

Hanory Managawant Ragistar #0. 

Hanory ManagaiMnt Ragistar dl. 

Manor y Hanagaitant Ragistar #2. 

MaMory Managaitant Ragistar #3. 

Hamory Typ* (HSVll-J.nSVll-L, or HSVll-P). 

Physical Addrass (assartad by tha program aftar mapping). 

Pattarn nunbar. 

Program Countar at tha tima tha mrror occurred. 
Single Bit Error (correctable error). 

Virtual Address (aeserted by the program before mapping). 
The data that Mse written into the let half of a double Mord. 
The data that Mae written into the 2nd half of a double word. 
Exclusive OR of the good and bad data. Shows the bad bits. 
Address under test 
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SEQ 0054 



1565 
1586 

1587 3.3 Error Halts 

1588 

1589 Thar* ara aavaral Halts m tha progran. 

1590 

1591 All unuaad trap vactors contain a trap catchar (.UORO .*2.HALT). 

1592 

1593 An undaPinad TRAP instruction halts at syabolic location "tHALT2". 

1594 

1595 Tha APT down load saquanc* Mill halt at syabolic location "APTHLT". 

1596 

1597 Halt on Error option (SU15 Sat) at syaboUc location "IHALT". 

1596 

1599 Halt proaraa CSU6 Sat) at symbolic location "lEXHALT". 

1600 

1601 PoMor Fail Mill nornally halt at tha and of tha shut down saquanca 

1602 (syabolic location "tOOUN"). 
1603 

1604 PoMsr Fail has a fatal Halt at ayabolic location "tlLLUP" Mhich can ba 

1605 cauaad by poMor up occurring befora poMor doMn aaouanc* co«platad or 

1606 by poMor doMn bafora a poMor up aaquanca is complatad. 
1607 

1608 
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1610 
1611 
1612 
1615 
1614 
1615 
1616 
1617 
1616 
1619 
1620 
1621 
1622 
162S 
1624 
1625 
1626 
1627 
1626 
1629 
16S0 
1631 
1632 
1633 
1634 
1635 
1636 
1637 
1636 
1659 
1640 
1641 
1642 
1645 
1644 
1645 
1646 
1647 
1646 
1649 
1650 
1651 
1652 
1653 
1654 
16SS 
1656 
1657 
1656 
1659 
1660 
1661 



4.0 PROGRESS REPORTS 

P««a eo«pl«t« typ«outs as follOMS: 



END PASS 
END PASS 
END PASS 



C 

«QV 



0 
1 
2 



NOTE 

Paas 2 Mas flagged as a Quick Verify 
Pass. (Bseaus* of a change in SUS) 



To obtain progress reports Mhile executing, typing a Control "T" Mill 
print out the information encoded in the display register. 
Example: 

BANK- 2 TEST- 34 
Reference Section 2.4.4.7.18 for more information on Trnv '"*- 

5.0 CSR INFORMATION TABLES 

The follOMing is a picture vieM of the current control status 
registers Mhich can be tested by this program. It shoMS bit 
assignments and definitions to provide a handy reference, and 
shoMS the similarities and differences betMeen each one: 

NOTE 

All unused bits in each CSR are equal to zero. 
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SEQ 0036 



1663 
1664 
1665 
1666 
1667 
1668 
1669 
1670 
1671 
1672 
1673 
1674 
1675 
1676 
1677 
1678 
1679 
1680 
1681 
1682 
1683 
1684 
1685 
1686 
1687 
1688 
1689 
1690 
1691 
1692 
1693 
1694 
1695 
1696 
1697 
1698 
1699 
1700 
1701 
1702 
1703 
1704 
1705 
1706 
1707 
1708 
1709 
1710 
1711 
1712 
1713 
1714 
1715 
1716 



5.1 MSVll-J CSR 



IIIIIIIIIZZIIIIII 
(Z) !0E! !EA! ! ADDRESS !SE!IP!0C!EC!EE! 

ZZZZZZZZZIIIIIIII 

is'ii'ii'ii'ii i6'69"oe"o7'o6 os'oi 6s 62 61 66 



zzzzzzzzzzzzzzzzz 

(ZZ*! !DE!EA!SZ! ! CHECK BZTS !SE!ZP!DC!EC!EE! 

ZZZZZZZZZZZZZZZZZ 

"i5"l4'i3'i2"ii'i6'69 66 6? 66 6s 04 6s 62 61 66 



ZZIZIIIIIZZZIIZZZ 
(ZZZ) !OE!EA!SZ! ! SYNDROMES !SE!ZP!0C!EC!EE! 

ZZIIIIIIIIIIZIIZZ 

15 14 13 12 11 10 09 00 07 06 05 04 03 02 01 00 



Bit •••ignMnt* mrm defined 

folloMs: 

BIT15 UNCORRECTABLE ERROR 
On • r«*d to MMory (ECC Ditabl« 
Bit - 0). this bit is s«t if 
• doubl* srror occurs. Th« 
•rror sddrsss is storsd in th« 
CSR. Sstting this bit slse 
turns on a rod LED at tha raar of 
tha card for a visual indication. 
This bit is also sat in ECC 
Oisabla Moda if a SERR or DERR 
occurs. 

BIT14 EUB ERROR ADDRESS 

With Bit 14 - 1. a rtmd to tha CSR 

Mill fatch addrass A21 

through A18. Uhan Bit 14-1. 

diagnostic data aay not b« 

loadad into tha syndroaa 

rag ! star . 



1 
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SEQ 0037 



«7«9 BIT13 SET INHIBIT nOOC 

X720 Uh*n this bit is Mt to 

^721 • "1". it onabl** th« inhibit 

^722 aod* pointer to inhibit 

^723 cither th« first or socond 

^724 16K fro* svsr ooino into tho 

X725 Ois9 Chsck or eCC Oisabls 

1726 Hods. 

X72a BITS05-10 CHECK BIT STORAGE (CSR ID 

1729 Chock Bit Storogs (Disg CK 

1730 Bit 2 ■ 1) 

1731 Uhon in th« diagnostic chock 

1732 moS* thos* t ts aro usod to store 

1733 th« chock bits to b« itritton 

1734 into Moaery or tho chock bits 

1735 road fro* m m mory . If a double 

1736 error or si nolo error occurs 

1737 Mhen in the 3 i agnostic chock 
1730 aode and ECC disable Bit 1-0. 

1739 then the check bits are Stored 

1740 in tho CSR togathor with 

1741 the double or single error 

1742 bit. Those bits are Hritoable 



1743 in diagnostic aoda. A *1' 

1744 stored in Bit 11 if CSR 

1745 02. CSR 13. and CSR 14 are 

1746 Mt to indicate that the 

1747 aeaory under toot is a nSVll-J. 
1746 

1749 BITS05-11 QBUS ADDRESS STORAGE (CSR I) 

1750 (Oi*0 Ck Bits 2-0. ECC 

1751 Disable Bit 1-0) 

1753 If a double or single error 

1754 occurs on a Read cycle, then 

1755 address Sits All through 

1756 A17 aro stored in thoso bits 

1757 These bits are road only on 
175* the condition that SERR (CSR 4) 

1759 or OERR (CSR 15) is set but 

1760 CSR 14 is not set. 
1761 

1762 EQ6 Address Storage (Diag Ck 

1763 Bit 2 - 0). ECC Oisable Bit 

1764 1 ' 0 or 1). 

1766 If a double or single error 



1767 occurs on a Read cycle. 

X768 address Bits A17 through 

1769 All are stored in CSR Bil 

:770 11 through 5 and address 

1771 Bits A21 through A18 are 
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SEQ 0038 



1773 

X/74 atorad in a backup rag i star. 

1773 Tha EQB Error Atfdraaa 

1776 Ratrlaval Bit (CSft 14) ia 

1777 uMd to obtain tha total 
1776 arror addraaa aa followa: 
1779 

1760 With CSR Bit 14 - 0 a raad to 

1761 tha CSR Mill obtain A17 
1782 through All froa CSR Bita 11 
1763 through 5. 

1764 

1765 CSR Bit 14 can than ba aat 

1766 to a *1* and a raad to tha 

1767 CSR Hill than raad A21 
1766 through A18 fre« CSR Bita 6 
1769 through S and O'a froa CSR 
1790 Bita 11 through 9. 

1791 

1792 Marm99 Bita A21 through 

1793 All ara obtai nad 

1794 to locata tha deubla 

1795 Tror to a IK aa g want of 



1796 aaawry. 
1797 

1796 Tha EQB addraaa A21 

1799 through A16 ia raad only 

1800 t*\*nmvr CSR 14-1. 
1601 

1602 BIT05-10 SYNOROHE STORAGE (CSR III) 

1603 If a deubla or oingla arror 

1604 occuro on a raad or Mrita 
1805 byta cycla. and if CSR bit 



1606 2 i« Mt to a "0 

1607 Bita X. 0. 1. 2. 4 and 8 
1806 and 9X0?^ in CSR bita 5 
1809 through 10. To raad tha 

1610 ayndroM bita froa CSR, Bit 

1611 you auot raad tha mrror 

1812 addraaa. than aat 2 of 

1813 tha CSR auot ba at to 



1814 a "l" (diagnoatic aeda) 

1615 tha CSR raad aQain. Thia oparation 

1616 Hill alloH ayndrea a bite 

1617 for a aingla or deubla 
1816 failure to ba raad inataad 
1619 of the addraaa bita noraally 
1820 raad Mhan CSR 02 ia aat to *'0-. 
1821 

1822 BIT04 SINGLE ERROR 



1823 If on e raad to aaaory e 

1824 SBE occura, tha mrror 

1825 addraaa A21-A11 and 

1826 tha orror ayndroaaa Mill 
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1626 
1629 
16S0 
1651 
1652 
1655 
1654 
1655 
1636 
1657 
16S« 
1659 
1640 
1641 
1642 
1643 
1644 
1645 
1646 
1647 
1648 
1649 
1650 
1651 
1652 
165S 
1654 
1655 
1656 
1657 
1658 
1659 
1660 
16«1 
16*2 
16«3 
16«4 
16*5 
16M 
1867 
18M 
1849 
1870 
1871 
1672 
1873 
1874 
1675 
1876 
1877 
1876 
1879 
1680 
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SEQ 00S9 



b« lo90*d !n CSA Bits 5-11 
unl«M tK« ur>cerr«ctabl« •rror 
CSA 15 is sst. TK« srror 
srtd r s s s will b« loaysd 
unconditienslly in tK« ECC 
Oisabls nods. This bit is not 
••t if Inhibit nods (Bit 
13 " 1) is sst snd Oi agnostic 
nods (Bit 02 - 1) is oat. 

BIT03 INHIBIT NODE POINTER 
This bit Morko in conjunction 
Mith tha Sat Inhibit Hods 
(Bit IS). Uhan Bit 13 is sat 
to a 1. a 16K portion of 
MMry ia inhibitad froa 
oparotina in tha ECC Oiaabla 
Hods or Diagnoatic Chack Hods. 

Tha Inhibit Neda Pointar 
indicataa Mhich 16K ia baing 
inhibitad. i.a.. Bit 3 - 0 
tha first 16K of aaMry ia 
inhibitad. Bit 3 - 1. tha 
aacond 16K of aaaory ia 
Inhibitad. 

Uith Bit 13 aat to a 0. Bit 
3 bacaaae inoparativa. 

BitOS. in conjunction with 
Bit 13. thorafor* allatts a 16K 
chunk of aiaory to aliiaya hava 
ECC eovaraga. Tha oystaaa 
diagnostic can tharafora 
rmmt4» in thia protactad 
portion of aiBory and can 
diaabla ECC and/or run tha 
Oiagneatic Chaek Hoda in tha 
raat of aaaery withaut itaalf 
bacoaing vulnarabla to aingls 
•rrorm. Thia bit ia a Raad/Urita 
bit rm—t by pottar up wtd BUS 
INIT, 

BIT02 Oiavtoatic Chack neda 
Thia aoda allatM a aawta of 
forcing a aingla or dsUbla 
•rror in a daairad location. 
It aloe provide* a asans of 
aKaoining tha c h eck bite ene 
the eyndreae in a given 
locat I on . 
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SEQ 0040 



1003 Th« check bit* d«*ip«d for • 

1004 given data oattam ara ttrittan 
ISSS into Bita 5 through 11 of 
1506 tha CSR. A Mord or xrita byta 
1007 Minory Mill writa tha chack bita 
1000 from tha CSR to tha nOS array 
1009 (CSR 2 - 1) ir.ataad of tha chack 

1090 bita gan«r«t«d en tha data 

1091 to be written. Single errora 

1092 on tha read portion of the OATOB 

1093 cycle are corrected. 

1095 A read to the a a wory will 

109^ read the check bita atorad in 

1097 MMory and clock thea into 

1090 the CSR. 
1899 

1900 I' • double error or a ingle 

1901 error occure tha DERR or 

1902 SERR bit in the CSR ie eat 

1903 and tha error eyrvdroM bite 

1904 read from ECC ara atorad in 

1905 CSR Bita 10-5 aa Mall ae tha 

1906 addraaa bita. In Oiagnoatic 

1907 Check Mode tha error syndroM 

1908 bita Mill be read Mhan CSR 

1909 Bits 10-5 arc read. 
1910 

1911 Thia bit ia a Read/Unta bit 

1912 and ia reaat on poMar up and 

1913 BUS INIT. 
1914 

1916 BITOl DISABLE CORRECTION noOE 

1917 If thia bit ia aet. no a ingle 

1910 errors Mill be corrected. A 

1919 single error Mill eat CSR 4 

1920 CSR 15 or a double error 

1921 Mill eat CSR 15 and aaaart 

1922 BUS PBL if CSR 00 ia aaaarted. 

1923 The IK block of addraaa Mhara 

1924 the error occure Mill alao 

1925 be atorad in tha CSR. Tha 

1926 priority of a SERR and DERR 

1927 Mill be the aane, i.e.. the 

1928 Ift error infornation Hill 

1929 alHays be atorad unlaaa a DERR 

1930 pracedea a SERR. If a double 

1931 error occure during a write byte 

1932 cycle, the Mrite portion of 

1933 the cycle Mill not be aborted. 

1934 The check bits Mritten Mill 
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1956 
1937 
1956 
1959 
1940 
1941 
1942 
1945 
1944 
1945 
1946 
1947 
1946 
1949 
1950 
1951 
1952 
19SS 
1954 
1955 
1956 
1957 
1950 
1959 



SEQ 004 1 



have b««n g«n«rat*d or> th« 
data Mrittan. Thia a* a n a that 
i f a a I nala or dosjbla arror 
axiatad m tha location accaaaad. 
it MOuld ba claarad (unlaaa tha 
crrora Mora hard). 

Thia bit ia a diagnoatic aid 
to alloM Mr i ting and raading 
data froM ataory without 
intarfaranca fro« tha arror 

corraction logic. 

BITOO UNCORRECTABLE ERROR 
INDICATION ENABLE 
If a doubla arror occur a Mith 
ECC anablad or a aingla mrror 
or doubla mrror Mith ECC 
diaablad. on a Raad cycla to tha 
MMory and thia bit ia aat, 
than 6US PBL will ba aaaartad. 
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SEQ 0042 



1961 
1962 
1963 
1964 
1965 
1966 
1967 
1968 
1969 
1970 
1971 
1972 
1973 
1974 
1975 
1976 
1977 
1976 
1979 
1960 
1981 
1962 
198S 
1964 
1985 
1986 
1967 
1966 
1969 
1990 
1991 
1992 
199S 
1994 
1995 
1996 
1997 
1996 
1999 
2000 
2001 
2002 
2003 
2004 
2005 
2006 
2007 
2006 
2009 
2010 
2011 
2012 
2013 
2014 
2015 



5.2 MSVll-L/P CSR 



I I I I 
!PE!EU! ! 
I I I I 



I I 
!UP! 
I I 



I I 
!AE! 
I I 



I I I I I I 

ADDRESS 
I I I I I I 

1514 13 12 11 io 09 08 07 06 05 04 03 02 01 00 

Bit ■••IgniMnt* arc defined ■• follow*: 

BIT15 PARITY ERROR 

BIT14 EQ6 ERROR 
RETRIEVAL If the 
MMOPy i* on an 
Extended Q6US. Mhen 
BIT14 is zero, the Iom 
order failing 
addressee are 
available (Bits 
ll-17)i Mhen BIT14 is 
one. the high order 
failing addresses are 
available (Bits 18-21 
of address). If the 
Memory is on a Q8US. 
a jutnper disables this 
bit so that it is read 
only, and equal to ze- 
ro. 

BITS 11-5 ERROR 
ADDRESS Uith BIT 14 
set. they contain the 



ty er 
(Bits 



high order par it) 
ror address 
21-18 of address): 
Nith BIT 14 cleared, 
they contain the Iom 
order parity error ad- 
dress (Bits 17-11 of 
address ) . 

BIT02 URITE WRONG 
PARITY Noraial parity 
(odd) Mhen clear: 
other parity (even) 
Mhen set. 

BITOO ACTION ENABLE No 
action Mhen clears 
trap to vector 114 
Mhen set. 
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SEQ 004} 



2017 
2016 
2019 
2020 
2021 
2022 
2023 
2024 
202S 
2026 
2027 
2026 
2029 
2030 
2031 
2032 
2033 
20S4 
2035 
2036 
2037 
2036 
2039 
2040 
2041 
2042 
2043 
2044 
204S 
2046 
2047 
2048 
2049 
2050 
2051 
2052 
2053 
2054 
2055 
2056 
2057 
2058 
2059 
2060 
2061 
2062 



6.0 SUB -TEST SUMMARIES 

6.1 T«*t* 



TEST 



TEST 



TEST 



TEST 



TEST 



TEST 



BIT TEST OF ALL CSR'S/MATCH Ai.L CSR'S UITH MEMORY 
(CSR Access may cause wrong Type of Traps) 



TEST BANK 0 ACCESSES 
Failures ar« fatal. 



TEST BANKS 1-177 (OCTAL) FOR ZEROS AND ONES 
Errors ar« not typsd here - only logged in 
the configuration table 



ECC INHIBIT MOOE POINTER TEST 
5 

DIAGNOSTIC MODE DISPATCH ROUTINE 

This test runs all the patterns in the 

Mode selected. 



UNIQUE BANK TEST 
Pattern 27 is run 
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SEQ 0044 



2064 
2065 
2066 
2067 
2068 
2069 
2070 
2071 
2072 
2073 
2074 
2075 
2076 
2077 
2078 
2079 
2080 
2081 
2082 
2083 
2084 
2085 
2086 
2087 
2088 
2089 
2090 
2091 
2092 
209S 
2094 
2093 
2096 
2097 
2098 
2099 
2100 
2101 
2102 
2103 
2104 
2105 
2106 
2107 
2108 
2109 



6.2 Testa 

6.2.1 Ganaral Test Information 

Actual Taata ara idantifiad by ayabolic locationa "HTPXYY" Mhara X 
may ba any sub program indicator (A, B.C. ate) or 0 and YY m!11 b* th* 
numbar of tna taat . 

Satup procaduraa for each tast ara idantifiad by syabolic locations 
"HTOOYY" Mhara YY Mill ba tha number of the test. 

Tests reside in 4 ecripts that are scanned for execution. Symbolic 
location "MKCSR7" is a table of tests that can run once for each 
ECC bank. Symbolic location "HKPAT" is a table of tests that 
can run on each Bank of ECC memory. 

Symbolic location "njPAT" ia a table of teeta that can run on each 
Bank of Parity memory. Symbolic location "FSPAT" ia a table of 
tests that can b* run in Field Service Mode (command 5). 

The let 3 scripts are rompletely controlled by the APT E-table (even 

if not running under APT). Hodi f i cat ions to this table can be made 
(1) Mith APT, or (2) manually. 

Example E-table Segment: 

J THE FOLLOWING LOCATIONS SPECIFY WHICH TESTS 
(ARE TO BE RUN FOR PARTICULAR MEMORIES 

I REFERENCE THE TABLE LISTED BELOW TO RELATE BITS TO TESTS. 
;BITO SET WILL RUN THE FIRST ENTRY IN THE TABLE. BITO SET 
I IN THE SECOND WORD WILL RUN THE 17TH ENTRY IN THE TABLE... 



iNOTE**NULL TESTS DO NOT TAKE ANY TIME 



IDDWO 
IDDWl 
)DDW2 
IDDW3 
)DDW4 
IDDW5 



.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 



177777 
177777 
177777 
177777 
177777 
177777 



RECOMMENDED VALUE 

;ECC CSR TESTS 177777 TABLE - MKCSRT: 

sECC CSR TESTS 177777 TABLE • MKCSRT: 

:ECC TESTS 103777 TABLE • MKPAT: 

;ECC TESTS 17777 7 TABLE • MKPAT: 

tPARITY TESTS 003777 TABLE - MJPAT: 

(PARITY TESTS 177774 TABLE ■ MJPAT- 
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SEQ 0045 



2111 
2112 
2113 
2114 
2115 
2116 

2117 6.2.2 Specific Taata 

2118 

2119 

2120 

2121 

2122 6.2.2.1 Taat 0 Basic Data Tast 

2123 

2124 Uritaa Raada R2 into a i6K Bank. 

2126 Thia ia uaad for Zeros and Ones tasting and in Field Service Mode for 

2127 any console selected Test. 

2120 

2129 It can execute out of the USER Inatruction PAR'S. 

21S0 

2132 NOTE 
2133 

2134 It is frequently modified dynamically 

2135 such that (1) it returns after Nriting 

2136 only (the lat NOP is replaced with a 

2137 RETURN) or (2) it only counts Errors 
213S (the code PERR02 and NOP are replaced 
2139 Mith INC 8«PATERR). 

2140 
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SEO 0046 



2142 
2143 
2144 
2145 
2146 
2147 
2148 
2149 
2150 

2151 6.2.2.2 T««t 1 Address T««t 

2152 

2153 Writes Reads an incraiMnt !ng pattern equivalent to physical 

2154 addressed into a 16K Bank. 
2155 

2156 It can execute out of the USER Instruction PAR'S. 

2157 

2158 

2159 
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SEQ 0047 



2161 
216? 
216 « 
2164 
216S 

2166 6.2.2.3 T««t 2 CoaplcMnt Address T««t 

2167 

2166 Urit«« th« coaipl*««nt of th« physical addrass fron high addrassas to 

2169 loM Cttrita dOMn) and rmmdm from lorn addraaaaa to high (raad up). 

2170 

2171 This providas tha coaplaaant of tha covaraga of Tast 1 m both data 

2172 pattarn and addraasing saquanca. 

2173 

2174 It can axacuta out of tha USER Instruction PAR'S. 
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2176 
2177 
2178 
2179 
2180 
2181 

2182 6.2.2.4 T«*t 3 3 XOft 9 

2183 

2184 Uritcs Reads a Tact that co«plaai«nts as addrass bits 3 and 9 

2185 chanQ*. 
2186 

2187 This test is run 4 timas (1) with Zaros Ones. (2) with Onas 

2188 Zaroa. (S) with 401 Onas. and (4) MitS Onas 401. Tha taat of 

2189 tha 401 ia to forca a tha parity bita to bacoaia involvad. 
2190 

2191 It can axacuta out of tha USER Data POR'a, tha Usar Inatruction PAR' 

2192 tha Karnal Data PAR' a and tha Suparvisor Data PAR' a. 
219S 



cvnjAfio nsvii-J nenORY oiag. 



nACRO Y05.02 Monday 07-0ct-8S 16:57 Pa^t SO 



SEQ 0O49 



2195 
2196 
2197 
2198 
2199 
2200 
2201 

2202 6.2.2.5 T«*t 4 Rotating Zaroa Taat 

2203 



2204 Writaa a background pattarn of Onaa. Rotataa a Zaro Carry Bit laft 

2205 thru aach par of bytaa CIS tiaaa) and than chaeka that tha carry ia 

2206 Zaro and tha word C2 bytaa) ia at ill all Onaa. 

2207 



2208 It can axaeuta out of tha Uaar Data PAR' a and tha Karnal Data PAR' a. 

2209 
2210 

2211 NOTE 
2212 

2219 It ia not unco*M»on to obaarva tha good 

2214 data aqual to tha bad data. Thia 

2215 indicataa that tha carry Maa not claar 

2216 aftar 18 ROLB'a. 
2217 

2216 
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SCQ 0050 



2220 
2221 
2222 
2221 
2224 
2225 

2226 6.2.2.6 T«*t 5 Rotating On«* T«*t 

2227 

2228 Urit«« ■ background pattarn of Zaroa. Rotataa a Ona carry bit laft 

2229 thru aach pair of bytaa (18 ti«aa) and than chacka that tha Carry ia a 
2250 Ona and tha Uord (2 Bytaa) ia atill all Imro*. 

2231 

2232 Thia providaa tha co«plaMnt of tha covaraga of Taat 4 m data. 

III4 It can axacuta out of tha Uaar Data PAR' a and tha Karnal Data PAR' a. 

2235 

I237 NOTE 
2238 

2239 It ia not uncommon to obaarva tha good 

2240 data aqual tha bad data. Thia indicataa 

2241 that tha Carry waa not aat aftar 18 

2242 ROLB'a. 
224S 

2244 
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SCQ 0051 



2246 
2247 
2246 
2249 
2250 
22S1 

2252 6.2.2.7 T«at 6 Initial Data Taat 

22S3 

2254 Uritaa Raad* a deubl* Mord first ttith all bit* 0 axcapt 1 (for avary 

2255 bit poaition), Sacond Mith all bits 1 axcapt 1 (for avary bit 

2256 poa i t i on ) . 
2257 

2256 This is a vary quick chack of tha data patha. 

2259 
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SEQ 0052 



2261 
2262 
2263 
2264 
2265 
2266 
2267 

2266 6.2.2.8 T««t 7 Addr«M Bit T«st 

2269 

2270 UritM • backoround of all Zaroa. 

2271 Raad MOrmmu I for a 0 Byta. 

2272 CoMplaMnt Mdr— 1. 



2273 rtAsd 1 for a non 0 Byta. 

2274 For aach Mdrmuu Bit poaition froM Bit 1: 

2275 Virtual (2. 4. 10. 20. 40. 100. 200. 400, 1000. 2000. 4000. lOOOC. 

2276 60000. 20000) 

2277 Phyai«al (60002. 60004. 60010. 60020. 60040. 60100. 60200. 60400. 
2276 61000. 62000. 64000. 70000. 140000. 100000) 

2279 Road Addraaa for a 0 Mord. 

2260 Co»i>l tw r>t Addraaa contanta. 

2261 Raad Addraaa for a non-ZTo Mord. 
2262 

2263 Thia ia a vary quick cHack of tha rnddrm^^ bit uniquanaaa. 

2264 

226S 
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2267 
2266 
2269 
2290 
2291 
2292 

2293 6.2.2.9 Taat 10 Byt* Addraaaing Tast 

2294 

2295 With ECC Oiaablad. 

2296 Uritaa all onaa to a doubla Mord. 

2297 Tor aach of tha 4 Bytaa in tha Doubla Word. 
229« Claara ona byta. 

2299 Raada all 4 bytaa from doubla Mord. 

2500 Chaeka for only propar byta claar. 

2501 Ail ethar bytaa aat to all onaa. 

2S02 

2S0S Thia ia only dona on ona doubla Mord addrasa. 

2304 

2307 

2306 Thia !a run for ECC mamory only 

2309 

2310 
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SEQ 0054 



2312 
2515 
2514 
2515 
2516 
2517 

2518 6.2.2.10 1«st 14 Basic Double Bit Error T«*t 

2319 

P320 1. Urit« th« CSR to anabl* diafl wttxtm Mith • doublo bit «rror 

2321 ch«ck bit* of 110011 and Uncorractabl* Error Indication 

2522 anablad. 

2524 2. Writ* first AUT in a 16k bank with data of all zaro'a. 

2525 This Mill writ* th« chack bits in (1) 
2526 

2527 5. Read addrass. th!» should causa a deubla bit arror. BUS PBL 

2528 is assarted and Ma chack for a parity trap to occur. 
2529 

2530 4. Raad tha CSR for chack bits in (1) and Uncorrectable Error 

2551 Indicator. 

2332 

2SS5 5. Urite ones to the high byte of the address under test. Since 

2SS4 a 06E exsists at this address the write should be aborted. 

2335 

2336 6. Read address and check for a Parity trap to occur as a result of (5) 

2337 

2558 7. Repeat 5 and 6 for data of ones in the Iom byte and check for 

2559 Mrite abort and parity trap. 
2540 

2541 This test checks to see if a double bit error Mill be aborted and a 

2342 byte Mrite of a double bit error Mill be aborted. 

2543 

im NOTE 
2346 

2347 This test is only run for the fISVll-J 

2S4e 

2349 

2350 
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SEO 0055 



2352 
2553 
2354 
2S5S 
2356 
2S57 

2356 6.2.2.11 T«st 1/ Holding I's O's Test 

2SS9 

2360 

2361 1. Writ« a 16K Bank with alternating Bytaa of Zeros Ones 

2362 Mrit'ng a Byt* at a tiM«. 
2363 

2564 2. Read each Word or correct last. 

2365 

2366 3. Do (1-2) again for a cowplaiMnt Test. 

2567 

2366 This chocks the iMinory for tha capability of hold'ng O's I's. 
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2570 
2571 
2372 
2575 
2574 
2575 
2576 
2577 
2578 
2579 
2580 
2581 
2582 
258S 
2584 
2S8S 
2S86 
2587 
2588 
2589 
2S9C 
2S91 
259P 
2593 
2S94 
2S9S 
2S96 
2397 
2S98 
2S99 
2400 
2401 
2402 
2405 
2404 
2405 
2406 
2407 



6.2.2.12 T«st 20 SyndroM Bits to th« CSR on a SBE Tast 

1. Ur!ta CSR ttith check bita to corract bit 0 of tha firat AUT 
16k bank from a 0 to a 1 Mith diag moda. 

2. Urita AUT Mith data of O'a craating a SBE. 

3. Claar CSR. 

4. Raad tha AUT to clock tha addraaa and ayndromaa into tha CSR. 

5. Raad tha CSR for tha SBE indicator, bit 4. 

6. Urita tha CSR to diag moda to clock tha syndroma bita into 
CSR bita 5 11. 

7. Raad tha CSR for tha propar ayndroma bita. 

8. Rapaat 1-7 for all 16 data bits. 

9. Rapaat 1-8 for data of ones so that a corraction Mill occur 
froM a 1 to a zaro. 

This tast chacka to saa that tha EDC chip can datact Singla Bit 
mrrorm for all 16 data bits by chacking for CSR bitM and that 
tha proper syndroma bits ^ra placad in tha CSR. 

NOTE 

This tast is only run for the MSVll-J 
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2409 
2410 
2411 
2412 
241S 
2414 
2415 
2416 
2417 
2410 
2419 
2420 
2421 
2422 
2423 
2424 
2425 
2426 
2427 
2428 
2429 
2430 
2431 
2432 
2433 
2434 
2435 
24 36 
2437 
2438 
2439 
2440 
2441 
2442 
2443 
2444 
2445 
2446 
2447 
2448 
2449 
2450 
2451 
2452 
2453 
2454 
2455 
2456 
2457 
2458 



6.2.2.13 Test 21 Marching O's I's Test 

1. Writ* • Background of alternating Byt«« of Zero* Onas 

2. For tha 16K Bank addraaaing Domn 

(a) Raad chack a Mord 

(b) Byta Swap a Nord 

(c) Raad check a Moro 

3. For tha 16K Bank addraaaing Up 

(a) Raad chack a Mord 

(b) Byta Swap a Mord 

(c) Raad chack a Mord 

4. For tha 16K Bank addreaaing Up 

(a) Raad chack a Mord 

(b) Byta Swap a Mord 

(c) Raad chack a Mord 

5. For tha 16K Bank addraaaing OoMn 

(a) Raad chack a Mord 

(b) Byta Swap a Mord 

(c) Raad chack a Mord 

Thia chacka tha integrity of tha 32 Bit Double Uorda. 
It can execute out of the 'Jeer Data PAR' a. 



NOTE 

It ia not uncowwon to aae a mialeading 
error typeout bacauae tha aaeond teat in 
each caaa ia baaed upon a bytaaitap of 

the firat teat which my or may not have 
failed. If the error report indicatea 
arrora in pafra Mith the bad bit in the 
aaeond report being the awae bit 
poaition relative to a byta than you 
ahould ignore the aaeond error report. 
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SEQ 0058 



2460 




2461 


6.2.2.14 


2462 




2463 




2464 


1. 


2465 




2466 




2467 




2468 




2469 




2470 




2471 




2472 




24 7S 




2474 




2473 




2476 




2477 




2478 




2479 




2480 




2481 




2482 




2483 




2484 




2465 




2486 




2487 




2468 




2489 




2490 




2491 




2492 


2. 


2493 


3. 


2494 


2495 




2496 


4. 


2497 




2498 




2499 


5. 


2500 




2501 




2502 




2503 




2504 




2505 




2506 




2507 




2508 




2509 




2510 




2511 




2512 





Uritc • diagonal Test of onaa on avary KOIAG(TH) atripa 
Mrita zaroa alaaMhara. 

Thia Tast ia on addrasaas not bit poaitiona. 
ExaMpla: 



Addraaa 



MSB 'a 



LSB'a 



NOTE 

Exanpla uaaa KDIAG of valua 4 mora typical ia a valua 
of 8. Conault tha aynbolic dafinltion of "KOIAG" in 
tha program liating to ba aura. 



Disturb aach row for > 3.2ms 

Raad chack diagonal pattarn 

Co (1-3) KDIAG timaa moving tha placamant 
atripa to covar all addraaa positions. 

Do (1-4) for a complamant pattarn 
(zaros in • background of onas) 



of tha diagonal 



NOTE 

Thia taat ia not normally axacutad 
axcapt un6«r APt or ACT. It may ba 
invokad VIA Fiald Sarvica Command 13 
(Kamikaza Mods). 
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SEQ 0059 



2514 
2515 
2516 
2517 
2516 

2519 6.2.2.15 T««t 23 Shifting Diagonal Taat 

2520 

2521 Siailar in ovarall operation to taat 22 axcapt it doaa not dalay 

2522 for rafraah and diaturb roMa. 

2525 
2524 

2525 NOTE 
2526 

2527 This t«st is not normally axacutad 

2528 except undar APT or ACT. It may be 

2529 invoked VIA Field Service CoMiand 13 
2550 (Kamikaze Mode). 

2531 
2532 
253S 
2SS4 
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5EQ 0060 



2536 
2537 
2536 
2539 
2540 

2S41 6.2.2.16 T«*t 24 Fast Galloping Pattern Test 

2542 

2543 This do** a clasaical galloping pattern axcapt that address ng 

2544 incr*««nt*d by 400 Octal (avary 64th double word) 
2545 

§547 NOTE 
2546 

2549 This test is not nornally executed 

2550 except under APT or ACT. It may b* 

2551 invoked VIA Field Service Command 13 

2552 (Kamikaze Mode). 
2553 

2554 
2555 
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2557 
2556 
2559 
2560 
2561 
2562 
2563 

2564 6.2.2.17 Test 26 Rando«n Data Taat 

2565 

2566 Urit* Pandow Data in a 16K Bank Mhil* !ncr«««nting tha Addrasaaa. 

2567 

2566 Paad chack Randow Data. 
2569 

2570 Thia routina raganarataa tha aaM randon nunbara by uaing tha aaM 

2571 
2572 

2573 aaad aa tha Mrita aaquanea. APtar tha raad chack tha aaad la updatad 

2574 ao that tha naxt «.<aa of thia pattarn Mill not invoka tha aama aaquanea 

2575 of random nuMbara. 
2576 

2577 If you Mi ah to ehang* tha random aaquanea ao that it ia diffarant than 

2576 any othar run in tha aama configuration than thara ara 2 Maya of doing 
2579 ao. 

2560 

2SS1 1. Modify aymbolie loeationa "SECOHI" and "SEEDLO" to any numbar 

2562 you Ilka. 

2563 

2564 2. Entar Fiald Sarviea Moda and axaeuta thia Taat (eonMand 5) 

2565 on aoma (any good) bank for a ahort tim* (30 aae or ao). 
2586 

2567 Thia can axaeuta out of tha Uaar Data PAR' a. tha Karnal Data PAR' a. 

2568 and tha Suparviaor Data PAR' a. 
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SEQ 0062 



25*0 
2591 
2592 
2593 
2594 
2595 

2596 6.2.2.16 T«*t 27 Uniqua Bank Taat 

2597 

2598 Thia Taat uaaa Taat 0 to writa raad tha Bank numbar in aach 

2599 bank . 
2600 

2601 It deaa not taat Banka that raquira ralocation to taat. 

2602 

260S It doaa not run aa part of any script but rathar ia alitaya run aftar 

2604 noraal pattarn taata ara eonplata. 

2605 
2606 
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SEQ 0063 



2600 
2609 
2610 
2611 
2612 
2613 

2614 6.2.2.19 T«st 30 Flush Out OBE's T««t 

261S 

2616 This Reads «ach location th«n novas th* old value bsck in. This is 

2617 dona with ECC Oisablsd and tharafera corrects sny OBE's or SBE's (if 

2618 possible). 

2*1' . , • ^ 

2620 It does not run as part of any script but rather is alMays run just 

2621 prior to the End of Pass Code, as part of a Control "C" (Boot) 

2622 CO— and, as part of End of Pass shutdOMn for ACT or XXDP Chain Mode. 

2623 as part of hanoing sequence after an error if under ACT or APT, and as 

2624 part of a shutdOMn sequence directed by Switch 8 (Halt Progra*). 
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SEQ 0064 



2626 
2627 
2626 
262^ 
26S0 
26S1 
2632 
26S3 
26S4 
26SS 
2636 
?637 
<:65« 
2639 
2640 
2M1 
2642 
2643 
2644 
2645 
2646 
2647 
2646 
2649 
2650 
2651 
2652 
2653 
2654 
2655 
2656 
2657 
2656 
2659 
2660 
2661 
2662 
2663 
2664 
2665 
2666 
2667 
2668 
2669 
2670 
2671 
2672 
2673 
2674 
2675 
2676 
2677 
2676 



6.2.2.20 T««t 31 S0e-A-L0N6 T««t 
Rat i onal i zat i en 



In order to concontrat* th« ■ » aory cyclaa of a taat into a particular 
mddrmum, mm auat cut th« ovarhaad cyclaa to a aiiniauM. F^raquantly. 
th« inatruction itaalf aay prow id* adaquata data or aat up a 
background in Hhich any caaiplaaantad bit aay find it hard to aurviva. 



Tha SOB inatruction ia tha only PDP-11 inatruction that ia (1) a 
aingla operand, (2) can ba rapaatadly axacutad at tha oaaa PC and. (3) 
can aacapa thie rapatitieua loop. 

Hanca. it can ba poaaibla to SOB a nOS call to daath Cor at laaat 
brain Maah hia). and to SOB a eora into ovar-haating (or at laaat Mara 
diacoafort). 

Tha SOB Routine Mill be loaded and called Mith RO eat equal to the SOB 
conetant "SOBK", Rl eat equal to the ceapleaent of a "SOB RO..' 
Inatruction -100776". 



Siaplified SOB Ex 
II: SOB 

nov 

CtiP 
BEQ 

SOBFAIL 
2«: SOBHOVl 
SOBnOV2 

soBnovs 

S0Bn0V4 
SOBHOV. . 



le: 



RO.ll 
Rl.lt 
Rl.ll 
21 



iSOB till RO underf loMe 
i Write ceapleaant of SOB 
I Read check not SOB 
sSkip if OK 
iTrap report error 
iCode to oet aelf aoved 
;ForMard I Mord and run 



The value of the SOB conetant can be found et eyabolic location "SOBK' 
(typical 25 daciaal). 



Thie teat ia not in the noriMl acript of exe«,ution but aay be 

APT E-TABLE. reference eyabolic locatione -HKPAT-. -HJPAT 



Via the 

"I00U2-5". Field Service Mode c 
running thie pattern. 



and 8 ia the noraal Method of 



NOTE 



Thie teet ie not noraelly executed 
except under APT or ACT. It aey be 
invoked VIA Field Service CoMMnd ll^ 
(Kaaikaze Mode). 
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SEQ 006S 



2660 
26«1 
26M 
2683 
2664 
2685 

2686 6.2.2.21 TMt 32 Writ* R«cov«ry T««t 

2687 

2688 This tMt cauMS a WRITE, REM). WRITE, READ. ... to occur in <mmp^ 



2689 and if th« 1st, Srd. 5th, ...READ ia bad th« proaraa may boiib or .< 

26*0 tha 2nd. 4th. 6th. ... READ ia bad tha prograa Mill flracofully typa 

2691 out tha arror. 
2692 

2693 Writa Racovarv Taat 

2694 Thia taat di ffara from othar taata in that it eenaiats 

2695 of a aaall taat prograa actually running in tha bank {jndmr taat. 

2696 Tha prograa ia aalf aodifying and aay ba difficult to dabuo. 

in tha dabug, r aaaabar that tha bank and aargin ara bair 



2697 To aid in tha dabug, r aaaabar that tha bank and aar g in ara baing 

2698 diaplayad. Thia Mill alloM th« uaar to at laaat aaa ahich aaaory 

2699 bank failad. 

2700 Tha taat conaiata of 1/2 of tha bank atorad with -NOV R2.-(PC)- 

2701 and tha othar 1/2 containing "177667". "177667" ia tha coaplaaant 

2702 of "jnP (RO)" inatruction. R2 containa "COn -(Rl)" inatruction 

2703 on antry to tha bank and tl containa th« highaat taat addraaa in 

2704 that bank. 

2705 If you undaratand thia ao far tha raat ia aaay. 

2706 Tha taat axacution ia aa folloaa: 

2707 1. Tha •HOV R2,-(PC)- instruction axacutaa atoring 

2708 tha contanta of R2 in tha addraaa it vacatad (Sua to -(PC). 

2709 2. Sinca R2 containa a "COn -(Rl)" instruction it coanlaaanta 



2710 tha highaat addraaa undar taat. thia a ddr a aa containad 

2711 "177667" so aftar tha COM -(Rl) it a«iala 110 

2712 clavarly this is tha "jnP (RO)- instruction. 

2713 3. This sa^uanca continuaa until tha "WV R2.-(PC)- 

2714 inatruetiona raaeh tha aiddia of tha taat bank. 

2715 than th« "JMP (RO)" inatruction ia aat 

2716 and axacutad. RO containad tha ratum addraaa bact 

2717 to taat 13. 

2718 4. Thaaa ataps ara rapaatad for aach bank sjnd^r taat. 
2719 
2720 
2721 

2722 NOTE 
2723 

2724 Thia taat ia not noraally rnxmcutm^ 

2725 axcapt undar APT or ACT. It aay ba 

2726 invokad VIA Fiald Sarvica Coaiwnd 13 

2727 (Kaaikaxa Noda). 
2728 
2729 
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2751 
2752 
2755 
2754 
2755 
2756 
2757 
2758 
2759 
2740 
2741 
2742 
2745 
2744 
2745 
2746 
2747 
2748 
2749 
2750 
2751 
2752 
2755 
2754 
2755 
2756 
2757 
2758 
2759 
2760 
2761 
2762 
2765 
2764 
2765 
2766 
2767 
2768 
2769 
2770 
2771 
2772 
2775 
2774 
2775 
2776 
2777 
2 778 
2779 



6.2.2.22 T«»t 53 Branch Gobble Taat 

Thi* taat loada a a«all routina into tha mawory undar taat. Tha 
routlna inovaa itaalf along in mmmory ona word aftar aach paaa ao that 
Mhan it raachaa tha and avary inatruction haa axacutad from avary 
location M'th tha axcaption of tha bag inning and and of aach taat 
araa. 



Tha Branch Gobbla'a ganaral format aftar you aliminata aatup coda 
coda to nova tha program along io aa folloMa. 



and 



BGTEST: 


0 




J TEST WORD 


BRG06B : 


SEC 








AOCB 


BGTEST 


:1NC LOU BYTE 




BUI 


It 


iENO LOOP AFTER 128 TIMES 




INCB 


BGTEST* I 


:INC HIGH BYTE 




BR 


BRG06B 


5 LOOP 128 TIMES 


11: 


BVS 


2« 


s BRANCH IF V-BIT SET (SHOULD BE) 




ERROR 




: ERROR TRAP 


21: 


CLV 




J CLEAR V-BIT 




INCB 


BGTEST 


;INC HIGH BYTE ONE LAST TIME 




BCS 


51 


i BRANCH IF C-BIT SET (SHOULD NOT BE) 




BVC 


5« 


sBRANCH IF V-BIT CLEAR (SHOULD NOT BE) 




BMI 


4t 


;BRANCK IF N-BIT SET (SHOULD BE) 


5«: 


ERROR 




i ERROR TRAP 


4$: 


RETURN 







Thia coda origionall 
Exarciaar DZQKA-A. 
aaction of that diagnootic 
axarciaar avar ainca. 



V cama from tha PDP-11 Family Inatruction 
Tha firat MOS mamorya fall auccaptabla to thia 
and it haa baan an important mamory 



NOTE 



Thia taat ia not normally axacutad 
axcapt undar APT or ACT. It may ba 
invokad VIA Fiald Sarvica Command 13 
(Kamikaza Moda). 
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SeO (XM>7 



;f781 
2782 
278S 
2784 
2785 

2786 6.2.2.23 T««t 54 Soft Error Tost 

2787 

2788 Rationalization 



2789 
2790 

2791 MOS chip* hav* a failuro mod* in Mhich thay can randomly pick or drop 

2792 bito. Thio io cauoad by Alpha particlao boMbarding tha call. If tha 
2795 call io vary oaall (and thay arai than tha alactrono displacad by tha 

2794 Alpha particla ara aufficiant to cauaa tha call to changa froa a ona 

2795 to a zaro or fro« a zaro to a ona. 
2796 

2797 Thia taat ia controlled by tha aain program ao that it ia uaad to 

2798 craata a Taat of 125252 and 52525 on altarnata pasaas of tha 

2799 prograas. Tha configuration tabla is uaad to flag banka that hava tha 

2800 Taat invalidated bacausa anothar Taat Mas Mrittan ovar thia 

2801 background. 
2802 

2605 This Tast is nothing wore than a clavar us* of T*st 0. 

2804 

2805 
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SEQ 006S 



2S07 
2808 
2809 
2810 
2811 
2812 

2815 6.2.2.24 Test Sb Uorst Ca** Parity Test 

2614 

2615 

2616 1. Tore* Writ* Urong Parity in each IK word block of th« Maaory 

2617 Undar Test. 
2818 

2^19 2 Raad ttith Parity Trapping anablad. making aura that a trap 

2820 occurra. 

2821 

2622 3. naka aura mrror address bits ara sat correct ly. 

2823 

2824 4. Writs good parity without trapping, and wake sure no trap 

2825 occurra when read. 
2826 

2627 
2626 
2629 

2630 NOTE 
2831 

2832 This test is run for parity memory which 

2833 is not controlled by the same CSR as the 
2634 program . 

2635 
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2837 

2838 

2859 

2840 

2841 

2842 

2843 

2844 

28- 

284, 

2847 

2848 

2849 

2850 

2851 

2852 

2853 

2854 

2855 

2856 

2857 

2858 

2859 

2860 

2861 

2862 

2863 



6.2.2.25 T««t 36 Correction Cod« Tost 

1. Urito CSR Mith chock bits to correct b't 0 of the first oddrcsi 
in • 16ic bank froa a 0 to a 1 Mith diag mods. 

2. Urito AUT Mith data of O's. 

3. Road AUT for correction of bit 0 froa a 0 to a 1. 

4. Ropaat 1-3 for all 16 data bits. 

5. Ropaat 1-4 for data of onos so that a correction Mill occur 
fron a 1 to a zero. 

This test checks to see that the EOC chip can correct Single Bit 
Errors for all 16k data bits froa a 1 to a 0 and visa versa. 

NOTE 

This test is only run for the MSVll-J 
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SEQ 0070 



2865 
2866 
2867 
2868 
2869 
2870 

2871 6.2.2.26 Tact 37 Check ECC Disable Taat 

287^ 

2873 1. Urite CSR with ECC disabla. Diag noda, and SBE chack bit* 

2874 of 000010. 
28/5 

2876 2. Urita AUT Mith data of z*ro'*. Thi* *hould writ* check bit* to 

2877 mamory. 
2878 

287^ 3. Raad AUT for data of zaro* inauring no correction tta* made. 

2880 

2882 NOTE 
2883 

2884 This test is run on the MSVll-J only. 

2885 

2886 

2887 

2888 

2889 
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SEQ 0071 



?e91 
2892 
2893 
2894 
2895 
2896 

2897 6.2.2.27 Test 41 Address to CSR on QBE Tost 

2898 

2899 1. Writs CSR with ECC disabls. Diag mod*, and Doubls Bit srror 

2900 ehsetc bits of 010011 
2901 

2902 2. Writs AUT with data of zsros crsating a OBE. 

2903 

2904 3. Rsad AUT to dstset OBE and to clock address into CSR 

2905 

2906 4. Rsad CSR for eorrset addrsss in bits 5-11. 

2907 

2908 ^. Znersmsnt addrsss by Ik and rspsat 1-4 until 16k is dons. 

2909 

2910 This tsst insurss that the correct address appsars in CSR bits 5-11 on a OBE 

2911 

2912 

2913 NOTE 
2914 

2915 This test is run on a MSVll-J only. 

2916 

2917 

2918 
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SEQ 0072 



2920 
2921 
2922 
2923 
2924 

2925 6.2.2.2a T«st 42 Extended Address to CSR on Error Tsst 

2926 

2927 1. Writs CSR Mith SBE ehsek bits of 000010 Mith Diagnostic Mods. 

2928 

2929 2. Writ* Iom address in a 16k bank Mith data of zeros creating a 

2930 SBE . 
2931 

2932 3. Clear the CSR. 

2933 

2934 4. Read address to detect SBE. 

2933 

2936 5. Read CSR for correct address and the SBE indicator bit 0A. 

2937 

2936 6. Enable CSR bit 14 to check the Extended address bits. 

2939 

2940 7. Read CSR for correct address bits 

2941 

2942 6. Repeat 1-7 Mith a test address that is the highest in a 16k bank. 
2943 

2944 This test checks to see that the correct address bits apppear in the LSR. 

2943 This is also repeated for the Extended Address function in the CSR. 
2946 

2947 NOTE 
2946 

2949 This test is only run for th« MSVll-J 

2930 

2931 

2932 

2933 

2934 
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SEQ 0075 



2956 
2957 
2956 
2959 
2960 

2961 6.2.2.29 T«st 43 Writ* Byt* Test 

2962 

2963 1. Writ* CSR to Diao mod* Mith chack bits of 001100. Thaaa 

2964 corraapond to data of zaroa. 
2965 

2966 2. Urita firat AUT with data of ona in bit zaro. Tha writa 

2967 affactivaly craataa a SBE in byta 0. 
2966 

2969 3. Claar tha CSR 

2970 

2971 4. Urita byta 1 of tha AOT with data of all onaa. 

2972 

2973 5. Raad CSR to chack for SBE indication. 

2974 

2975 6. Urita tha CSR to Diag moda. 
2976 

2977 7. Raad tha AUT to chack for tha corract data all onaa in high byta 

2976 and all zaroa in Iom byta. 
2979 

2960 6. Raad tha CSR to chack for corract chack bita corraaondmg to tha data 

2961 raad in (7). Thcaa chack bita ara 000110. 
2962 

2963 9. Rapaat (l)-(8) thia tima craating an %rror in byta 1 (2) and writing 

2964 byta 0 in (4). 
2965 

2966 Thia taat chacka to aaa that a SBE will b« corrcctad during tha raad portion of tha 

2967 byta writa and that correct chackbita will be ganaratad on tha writa. 

20Ae 

2';o9 
2990 
2991 

2992 NOTE 
2993 

2994 Thia taat ia only run for tha MSVll-J 

2995 
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SEO 0074 



2997 
2998 
2999 
3000 
3001 
3002 
5003 
3004 
3005 
3006 
3007 
3008 
3009 
3010 
3011 
3012 
3013 
3014 
5015 
3016 
3017 
3018 
3019 
3020 
3021 
3022 
3023 
3024 
3025 
3026 
3027 
3028 
3029 
3030 
3031 
3032 
3035 
5054 
5055 
5056 
5057 
5058 
5059 
5040 



6.2.2.50 Test 44 Shifting Chcckbit* through the CSR Test 

1. Writ* CSR to Oiag Mod* to Enabla Chcckbit register. 

2. Urit* CSR with chcci' bit* of 000001. ECC diaabl* and Oiag mod*. 

5. Urit* iMMory with d*t* of z*ro*. Thi* *hould writ* In* check bits 
into iMMory. 

4. Co«pl*iit*nt ch*ck bit* p*tt*rn and writ* CSR a* in (2). 

5. R**d CSR for co«pl*iii*nt ch*ck bit pattarn. 

6. Raad HMmory to r**d ch*ck bit* written in (2) into CSR. 

7. R**d CSR for cor rot ch*ck bit* written in (2). 

8. Shift ch*ck bit p*tt*rn and repeat (1-7) till CSR bit* 5-10 ar* done. 

9. CoiipleMent check bit pattern !n (2) and repeat (1-6) ahifting a zero 
through a field of one*. 

10. Repeat 1-9 for every 100 octal location* in 16k 

Thi* te*t check* the ability to read check bit* from the CSR to meitory and back. 
The teat i* done twice. Once ehifting a field of a one through a field of zero* 
and a zero through a field of one*. Thi* t«*t* the Checkbit/SyndroM* bit regieter 
and Cheek bit RAn'a. Thi* te*t i* done for every 100 octal location* in 16K. 

NOTE 

Thi* teat i* only run for the MSVll-J 
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SEQ 0075 



3042 
3043 
3044 
3045 
3046 
3047 
3040 
5049 
3050 
3051 
3052 
3053 
'»0'S4 
5055 
5056 
5057 
5058 
5059 
3060 
3061 
3062 
3063 
3064 
3065 
3066 
3067 
3068 
3069 
3070 
3071 
3072 
5073 
3074 
5075 
5076 
3077 



6.2.2.31 Test 45 SyndroM« Bits to th« CSR on a OBE T«»t 

1. Writ* CSR Mith Ciag Mod« to cnabl* Check /SyndroM bit Register. 

2. Writ* CSR with OBE check bits of 110011 with Oisg MOde. 

3. Write msMory with data of zeros creating a OBE. 

4. Clear CSR. 

5. Read mentory to detect DBE. 

6. Read CSR for Uncorrectable error indicator. 

7. Write CSR to Oiag mode to read Syndroae bits into CSR. 

8. Read CSR for correct Syndrom* bits of 111111. 

9. Repeat (1-8) with Muliple Bit Error check bits of 111100 and 
corresponding Syndrome Bits of 110000. 

This test checks the ability of the CSR to detect a DBE and read for the proper 
Syndrome bits generated by the EOC chip. This test is then repeated with check 
bits corresponding to a Multiple Bit error. 

NOTE 

This test is only run for the MSVll-J 
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SEQ 0076 



5079 
5080 
5081 
5082 
5085 
5084 
5085 
5086 
^ot^ 

.088 
5089 
3090 
5091 
5092 
5093 
5094 
5095 
5096 
5097 
3098 
5099 
3100 
3101 
3102 
3103 
3104 
3105 
3106 
3107 
3108 
3109 
3110 
3111 
3112 
3113 
3114 
3115 



6.2.2.32 Test 46 Check Single Bit Error* with ECC Disabled Test 

1. Writ* CSR Mith check bits to correct bit 0 of the first address 
in a 16k bank froa a 0 to a 1 with diag aode and ECC disabled. 

Write AUT with data of 0' s thus creating a SBE. 

Write the CSR to ECC disable. 

Read AUT to detect SBE. 

Check to see that no trap occured. 

Read CSR to see that uncorrectable error (CSR15) is set. 
Repeat 1-6 for all 16 data bits. 



2. 
3. 
4. 
5. 
6. 
7. 
8. 



Repeat 1-7 for data of ones so that a correction Mill occur 
froai a 1 to a zero. 

9. Repeat 1-8 except In steps (3) the CSH is written to ECC Disable 
and BUS PBL enable and (5) mo check for traps. 

This test checks to see that SBE arc treated a uncorrectable errors with ECC 
Disable. The test is repeated 2 tines, once with traps disabled and again 
Mith it enabled, this is done for all 16 possible SBE conditions. 

NOTE 

This test is only run for the MSVll-J 
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SEQ 0077 



5117 
5118 
5119 
5120 
5121 
5122 
S12S 
3124 
3125 
5126 
5127 
3128 
3129 
3130 
5151 
3152 
5133 
5134 
S13S 
3136 
3137 
3138 
3139 
3140 
3141 
3142 
3143 
3144 
3145 
3146 
3147 
3148 
3149 
3150 



6.2.2.33 T«*t 47 NO CSR Update On S8E with axaiating OSE taat 

1. Urtta tha CSR to 0!afl aoda to anabla Chaekbit/Syndreaw bit Rafliatar. 

2. Urita tha CSR with OSE chaek bit* of 110011 and Oiafl aeda. 

3. Urita naaory Mith data of zaroa eraating a DOE. 

4. Urita CSR Mith SBE chack bits of 000010 and Oiafl Moda. 

5. Urita naMory 4k abova addraaa in (3) eraating a SBE. 

6. Claar CSR. 

7. Raad naMory Mith addraaa in (5) to datact QBE. 

8. Raad CSR for corract addraaa and Uncorractabla mrror indicator 

9. Raad naaory Mith addraaa in (5) to dctaet SBE. 

10. Raad CSR for SBE indicator and no changa in QBE atatua in CSR 

in (8) 

Thia taat chacka to aaa that no updata Mill occur in tha CSR Mith a SBE in 
■awory Mhan a QBE alraady axiata. 

NOTE 

Thia taat la only run for tha MSVll-J 
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SEQ 0078 



3X52 
5153 
3154 
3155 
5156 
3157 

315« 6.2.2.34 T««t 999 Null T««t 

3159 

3160 This is an instant ratum addad to prm—r\f tha noftmrnrm atructura, 

3161 

3162 Thia taat raplaeaa any raal taata Mhan tha APT E-Tabla doaa net 

3163 apacify a taat to ba run. 
3164 
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SEQ 0074 



5166 

5U7 7.0 PRCGRAM FEATURES 
3168 

5169 7.1 Fast Data Accaas Rataa 

5170 

3X71 Ona of tha aain arcaa of concarn in taatmg aaaory m ayataaa 

3172 anviron«anta !a apaad. Ona of tha pri^a raa.ona that ayata* prograwa 

5173 lika RSTS.IAS and nUHPS can craah dua to Maatorv failuraa not 

3174 datactabla by MMory diagnoatica (0-124K,0 2 n€C.atc.) la bacauaa of 

S175 Multipla NPR davicaa contanding for tha bua. Aftar ao«a dalay a NPR 

3176 davica baco«aa bua Maatar and deaa aavaral Ma«ery tranafara at itaaiery 

3177 data rataa. 
5176 

3179 On tha othar hand noat diagnoatics Mhan writing raadmg and/or 

3160 chacking pattarna spand moat of thair tina fatching instrucriens and 

3181 oparanda out of thair progra* apaca and proportionally littla ti«a 

3162 accaaaing tha aaMory undar taat. 
5185 

5164 Thia diagnoatic'a mrror datacting abilitiaa hava baan optiMizad around 

5185 tha priaary daaign critaria of apaad. To this and tha following atapa 

5166 hava baan takan. 

5187 
5186 
5189 
5190 

5191 7.1,1 Faat City 
5192 

5195 Utilization of Manor y Managamant Ragiatara as Non Ma«ory Bua. Non 

5194 QBUS. Bipolar Maaory . Since Uaar Moda ia only uaad for ralocation 

5195 and Data Spaca ia nrnvr uaad. than aubrout !na« can ba axacutad froa 

5196 tha UIPAR'a. UOPAR's, KOPAR's, SDPAR's and with so«m Bit Pattarn 

5197 raatrictiona tha UIPOR's. UOPORs. KOPOR'a. and SOPOR'a. 

5199 Tha prograa runa m Karnal aoda and Pattarna ara axacutad m 

5200 Suparviaor moda for mapping purpoaas. All cora pattarna and aoma MOS 

5201 Pattarna ara aubrout inaa that ara moved to thia Bipolar region 

5202 referred to in tha program aa Fast City. 
5205 

5204 

US 

5207 

5206 10-Bit POP- 11 'a cannot execute from the 

5209 PAR' a bacauaa their PAR'S are only 12 

3210 bita Midai they alao have no Suparviaor 

5211 Mode. Therefore. all patterns are 

5212 axacutad in memory, uaing User Mode 
3215 (reference Section 7.5). 

5214 
5215 
5216 
5217 

5216 7.1.2 SOB'a 

5219 
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SIO OOAO 



52?; Utilization of tho full POP 11 Instruction Sot to spood pattorn 

algorithaia Cprinci pally th« SOB). 

3224 
3225 
3226 
3227 

3226 7.1.3 CACHE 

3229 

3230 CACHE la uaad b«tM««n pattarn tasts t» a*cr*m— program pass tiaaa. 

3231 CACHE can ba dafaatad by tha oparator (.r»fT»nc9 aaction 2.4.3.1). 
3232 

3255 
5254 

3255 7.2 Bank Zaro Taating 

3237 Bank Zaro haa baan traditionally naglactad by MaMory diagnostica for 

5238 tha folloMing raaaon. 

3239 

3240 Tha vactor apaca ax lata thara and ALL trapa aiuat not accaaa taat 

5241 pattarn data. If tha araa ia taatad tha diagnoatic muat not uaa any 

5242 trapa. and it ia againat tha rulaa for poMor to fail. 
5243 

3244 Syatama with Hanory Hanagamant can ovarcoma thia bacauaa all trapa ara 

3245 to Karnal Virtual apaca avan if tha pOMor ahould fail C caution aiuat ba 

5246 obaarvad bacauaa powar up goaa to phvaical addrasa 24 (bacauaa tha 

5247 HaMory nanaganant Unit conaa up off);. 
5246 

5249 Ho»«avar. Catch 22 ia that tha diaonostlc ia not APT coaipatibla in this 

5250 Ntoda bacauaa APT Accaaaas Physical na^ory Locations. 

3|s2 Tha POP-11/63 can ovar co«a thia bacauaa tSa QBUS nap can fool APT. 
5255 

5254 Bacauaa of tha pravious arguwanta thia prograw doaa not ralocata m 

5255 tha trua ainca of tha word (i.a. no poaition indapandant coda Maa 

5256 Mrittan (at laaat not on purpoaa)). but rathar thia progra* aovaa and 
3257 ranapa ity9r9mftmr rmt^rrmii to aa ralocataa). Thia anablaa tha 

3256 complata taating of Bank Zaro or any othar prooraat apaca or privilagad 

3259 apaca axactly aa all othar banka ara taatad. cTha conditional taat to 

3260 aaa if a bank ia protactad ia complamantcd ttt.mn ralocatad). 
3261 

fit! 

3264 

3265 Tha program Mill ralocata only in tha 

3266 first paaa undar APT s aftar thia. tha 

3267 progra* will ramain fixad in Banks 0 and 

3268 1 . 
3269 

3270 
3271 
3272 

3273 7.3 nainory Configuration flap 

5274 
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SEQ 0001 



5276 This Map is printed out iawMdiataly aftar aizmg tKa aa«ory unlaaa SU6 

5277 !• aat (rmfmrtnc* aaction 2.4.1). It can alao ea printad at any latar 

5278 tiaa in Fiald Sarvica Hoda (rmf9rt\e9 aaction 2.4.4.8.7) 

3279 

5280 Exaaipla: 

5281 nEnORY CONFIGURATION MAP 

5282 16K BANKS 

3283 1 2 5 4 5 6 7 

3284 0123456 ;012S4567012S4567012S4S670123456701234S6 7012345670123 
5285 ERRORS XX 

3286 flEnTYPE EEEEEEEPPPPPPPPPPPPPPPPPPPPPPPPEEEEEEEEEEECEEEEEEEEI EEEEEEE 

3287 CSR 000000001111111122222222222222224444444444444444444. 44444444 
5288 PROTECT PP I I P I 

3289 1111111 

3290 0 1 2 3 4 5 6 

3291 45670x234567012345670123456701234567012345670123456701234567 

5292 ERRORS 

5293 MEMTYPE EEEE 

3294 CSR 4444 

3295 PROTECT 
3296 

3297 

5298 Diaplayad ara Banks 0-77 Octal (1 mag Morda). If tha Fat TarMinal 

3299 SMitch Maa aat (r^f^rtne* aaction 2.4.1) than all Banks (0-177) Mould 

3300 ba ahoMn. If thia Maa an 18-Bit POP-11 (ag - 11/23). orly Banka 0-7 

3301 Mould ba printad. 

3302 Tha fialda: 
3303 

3304 t.N/«ORS: 

3306 ih« sizmg rout ma could not wnta zaros and onas in Banka 

3307 10 11, hanca thay ara markad aa bad Mith X'a. 
3308 

3309 
3310 
3311 

3312 ERRORS: 
SSIS 

3314 MEMTYPE: 
3315 

5516 Banka C-7 ara Mamory Typa E (MSVll-J). and Banka 10-37 ara 

3517 Manory Typa P CMSVli-L/P) and Banks 40-77 ara mamory typa 

3518 E(MSvil-J}. Banka 100-167 do not axiat. 
3319 

3320 CSR: 
3321 
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SEQ 0082 



5S23 

3S24 Banks 0-7 mrm •••ianad to CSR 172100. 10-17 to CSR 172102. 

SB25 and 20-57 to intarLtavad CSR' a 172104 and 172106 and banka 

3326 40-77 ara aasiflnad CSR 17210. 

3327 

3328 PROTECT: 
3529 

3330 Banks 0 and 1 arc protactad bacauaa they arc prograa apaca. 

3331 Bank 0 and 1 can alao ba protactad bacauaa thay ara in tha 
3532 bottoa 16K of an MSVll-L/P CSR. Tha protaction la hiararchical 
S555 and prograa apaca ovarshadoMS MSVll-L/P protaction. Banks 0 
3334 and 1 Mill not ba taatad until tha prograa ralocataa. 

3555 
3556 
3337 
3338 
3339 
3340 

3341 7.4 Evarything You'va Alttays Uantad To KnoM About SUPERMAC ... 
5542 

3545 SUPER MAC ia a aat of structurad prograaaing macros *:hat alloMa 
5544 pregraM to ba itrittan in a high laval. aaaily undaratood languaga. 

3546 Aa a ganaral rula. aeat SUPER-MAC atataaianta can ba singla-lina 

5547 atataiMnta or aultipla-lina (naatad) block atataaianta. A aingla-lina 

5548 atataaiant auat ba complatad on ona aourca linai no continuation li naa 

3349 ara alloMod. Singla-lina atataaanta ahould ba aa ahort and aiapla aa 

3350 poasibla. Co— l a nta may alao ba includad on a aourca lina. All tha 

3351 ganaral rulaa. conditiona, ate, that govarn MACRO-11 alao govarn 
3552 SUPER -MAC. Spacing on a aourca Ina ia wary important, Tha alaaants 
33S3 should ba saparatad by a comma or a space. Tabs should nmytmr ba uaad 
3334 for apacing. For axampla: Tha axpraasion A«B is intarpratad 
3555 diffarant than A * B. 

5556 

3357 All tha con<>itional atatamants can ba writtan aa mult !pla-l ina naatad 

3358 blocka. Each laval of naating Mi thin a block muat ba tarminatad Hith 

3559 an aaaociatad END statamant. Each laval of naating should ba indantad 

3560 tMO apacaa. 

5561 . . 

3362 Uaar Mrittan macroa or aaaambly languaga instructions may ba mcludad 

3363 in a program if daairad. Aa a dabugging aid, if tha aymbol LST$t is 

3364 dafinad, it Mill cauaa ganaratad coda and labels to ba liatad. All 
S365 programa muat bagin Mith tha macro call SMACIT. This call initializaa 
3366 SUPER-MAC. All lagal POP-11 source and destination operands ara legal 
5567 in SUPER -MAC. 
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SEQ 0083 



3369 






3370 
3371 


7.4.1 SmdI* Soupc* F;1« - 
.ENABL A8S 


3372 




.ENABL AMA 


3373 




. MCALL . SUPER 


3374 




. SUPER 


3375 




jLSTI»"0 


3376 




B1T5-40 


3377 


A 


0 


3376 


B 


0 


3579 


C 


0 


3380 


0 


0 


3361 


E 


0 


3362 


F 


0 


3363 


G 


0 


3384 


H 


0 


3365 


I 


0 


3366 


J 


0 


3387 




.PAGE 


3366 


(LET EXAMPLES 


3369 




LET RO :• A 


3390 




LET 8 :- C * 0 


3391 




LET E :- F ♦ 1 


3392 




LET G :- H ♦ 2 


3393 




LET J :• J ♦ 01 


3394 




LET A :B- B 


3395 


iIF EXAMPLES 


3396 




IF A IS TRUE 


3397 




MOV 23.0 


3398 




END tOF IF A 


3399 




IF B IS FALSE 


3400 




MOV 34. E 


3401 




END «0F IF B 


3402 




IF A EQ B THEN LET C 


3403 




IF A LT B 


3404 




MOV CD 


3405 




ELSE 


3406 




MOV E.O 


3407 




END lOF IF A 


3408 




IF A EQ B AND C NE D 


3409 




MOV F.G 


3410 




ENO tOF IF A 


3411 




IF A EQ 8 OR C NE 0 


3412 




MOV F.G 


3413 




ENO »0F IF A 


3414 




IFB A EQ B AND C EQ 


3415 




MOV H.J 


3416 




ELSE 


3417 




MOV E.J 


3416 




END tOF IF8 A 


3419 




IF8 A EQ 8 AN08 C EQ 


3420 




MOV H.J 


3421 




ELSE 


3422 




MOV E.J 



D 



1 
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3424 END I OF ire A 

3425 1^ RESULT IS EO 

3426 HOV A.B 

3427 END lOF IF RESULT 

3428 IF BITS SET. IN A 

3429 MOV B.C 

3430 END iOF IF BITS 

3431 IF BITS OFF. IN A 
3*32 MOV CO 

5453 END sOF IF BITS 

5454 : ON. ERROR IS LIKE AN IF STATEMENT ON THE C-BIT 

5455 i ON. ERROR EXAMPLES 

5456 ON. ERROR 

5457 MOV A.B 

5458 ELSE 

5459 MOV C.B 

5440 END tOF ON. ERROR 

5441 ON.NOERROR 
5442 

5445 

5444 MOV C.B 

5445 ELSE 

5446 MOV A.B 

5447 END :0F ON.NOERROR 

5448 ON. ERROR THEN LET A :B- B 

5449 tFOR EXAMPLES 

5450 FOR I :- -5 TO 23 

5451 INC A 

5452 END lOF FOR I 

5453 FOR RO :« 0 TO 140 BY 4 

5454 DEC A(RO) 

5455 END :0F FOR RO 

5456 FOR I 133 OOUNTO 3 BY 2 

5457 ADO A.B 

5458 EhU) I OF FOR I 

5459 : BEGIN EXAMPLES 

5460 BEGIN ALPHA 

5461 FOR RO 0 TO 167 

5462 MOVE A(RO).B 

5465 IF B LT 0 THEN LEAVE ALPHA 

5464 END tOF FOR RO 

5465 FOR RO :- 400 TO 567 

5466 IF 6 GE 0 THEN LEAVE ALPHA 

5467 END |0F FOR RO 
5466 END ALPHA 

5469 i (RETURN EXAMPLES 

5470 (RETURN 

3471 (RETURN ERROR 

5472 (RETURN NOERROR 

3473 sCASE EXAMPLES 

3474 MOV A.RO 

3475 CASE RO 
5476 A 
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SEQ 0085 



3478 




B 




3479 




C 




3480 




D 




3481 




E 




3402 




F 




3483 




END iOF 


CASE RO 


3484 








3485 




.END 




3486 








3487 








3488 


7.4.2 Saaiplc Listing F 


3489 


•MAIN. 


MACRO Mini 01 


3490 








3491 








3492 


1 


000000 




3493 


2 






3494 


3 






3495 


4 


000000 




3496 


5 






5497 


6 




000040 


3498 


7 


000000 


000000 


3499 


8 


000002 


000000 


3500 


9 


000004 


000000 


3501 


10 


000006 


000000 


3502 


11 


000010 


000000 


3503 


12 


000012 


000000 


3504 


13 


000014 


000000 


3505 


14 


000016 


000000 


3506 


15 


000020 


000000 


3507 


16 


000022 


000000 


3508 








3509 
3510 


.MAIN. 


MACRO Mini 01 


3511 








3512 








3513 


18 






3514 


19 


000024 




3515 


20 


000030 




3516 


21 


000044 




3517 


22 


000056 




3518 


23 


000072 




j519 


24 


000100 




3520 


25 






3521 


26 


000106 




3522 


27 


000114 


012737 


3523 


2S 


000122 




3524 


29 


000122 




3525 


SO 


000130 


012737 


3526 


31 


000136 




3527 


32 


000136 




3528 


33 


000154 




3529 


34 


000164 


013737 


3530 


35 


000172 
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.ENABL ABS 

.ENABL AMA 

.MCALL .SUPER 

•SUPER 

iLSTII-O 

BIT5-40 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 



000023 000006 



000034 000010 



000004 000006 



J LET EXAMPLES 

LET RO A 
LET B :- C ♦ D 
LET E :- F ♦ 1 
LET G :- H ♦ 2 
LET J J ♦ 01 
LET A :B- B 
5 IF EXAMPLES 

IF A IS TRUE 

MOV 23,0 
END lOF IF A 
IF B IS FALSE 

MOV 34. E 
END lOF IF B 
IF A EQ B THEN LET C 
IF A LT B 

MOV CD 
ELSE 



CvriJASO MSVll-J MEMORY OIAG. 



MACRO YDS. 02 Monday 07 -Oct -85 16:57 P»g« 67 



SEQ 00B6 





36 


000174 


013737 


000010 




37 


000202 








38 


000202 








39 


000222 


013737 


000012 




40 


000230 






J J J f 


41 


000230 








42 


000250 


013737 


000012 




43 


000256 








44 


000256 






SMI 


45 


000276 


013737 


000016 




46 


000304 






3543 


47 


000306 


013737 


000010 


3544 


48 


000314 






3545 


49 


000314 






3546 


50 


000334 


013737 


000016 


3547 


51 


000342 






3548 


52 


000344 


013737 


000010 


3549 


53 


000352 






3550 


54 


000352 






3551 


55 


000354 


013737 


000000 


3552 


56 


000362 






3553 


57 


000362 






3554 


58 


000372 


013737 


000002 


3555 


59 


000400 






3556 


60 


000400 






3557 


61 


000410 


013737 


000004 


355S 


62 


000416 






3559 


63 








3560 


64 








3561 


65 


000416 






3562 


66 


000420 


013737 


000000 


3563 


67 


000426 






3564 


68 


000430 


013737 


000004 


SS6S 


69 


000436 






3566 


70 


000436 






3567 


71 


000440 


013737 


000004 


3568 


72 


000446 






3569 


73 


000450 


013737 


000000 


3570 


74 


000456 






3571 










3572 
3573 


.MAIN. 


MACRO Mllll 01 


-APR -79 


3574 










3575 










3576 


75 


000456 






3577 


76 








3578 


77 


000466 






5579 


78 


000474 


005237 


000000 


3580 


79 


000500 






3561 


80 


000514 






3582 


81 


000516 


005360 


000000 


3563 


82 


000522 






3584 


83 


000534 







000006 MOV E.O 

END t OF IF A 

IF A EQ B A>«) C NE 0 
000014 MOV F . G 

END «0F IF A 

IF A EQ B OR C NE 0 
000014 MOV F.G 

END lOF IF A 

IFB A EQ B AND C EQ 1 
000022 MOV H.J 

ELSE 

000022 MOV E.J 

ENO I OF IFB A 

IFB A EQ B ANOB C EQ 1 

000022 MOV H.J 

ELSE 

000022 MOV E.J 

ENO iOF IFB A 

IF RESULT IS EQ 
000002 MOV A.B 

ENO J OF IF RESULT 

IF BITS SET. IN A 
000004 MOV B . C 

ENO I OF IF BITS 

IF BITS OFF. IN A 
000006 MOV CO 

END lOF IF BITS 
i ON. ERROR IS LIKE AN IF STATEMENT ON THE C 
i ON. ERROR EXAMPLES 

ON. ERROR 
000002 MOV A.B 

ELSE 

000002 MOV C.B 

ENO I OF ON. ERROR 

ON.NOERROR 
000002 MOV C.B 

ELSE 

000002 MOV A.B 

ENO :0F ON.NOERROR 



ON. ERROR THEN LET A :B- B 
:FOR EXAMPLES 

FOR I -5 TO 23 

INC A 
ENO ,0F FOR I 

FOR RO :■ 0 TO 140 BY 4 

DEC A(RO) 
END iOF FOR RO 

FOR I 133 OOUNTO 3 BY 2 



BIT 
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000000 000002 



000000 000002 



SEQ 0087 



3586 




AAAEX O 

000^42 


AX V T V T 

063737 


3587 


85 


AAAK C A 

000550 




3588 


06 






3589 


87 


AAAC£^ 




3590 


90 


000566 




3591 


09 


000570 


116037 


3592 


90 


re 




3593 


91 


AAA£A^ 




3594 


92 


AAA£ 1 ^ 




3595 


93 


000620 




3596 


AX 

94 


OOOeZe 




3597 


95 


000696 




3598 


A^ 

96 






3599 


AT 

97 


AAAf VX 

000636 




3600 


AM 

98 


AAAX M A 

000640 




3601 








3602 


1 AA 






3603 


1 A1 


AAA^CA 


Old fUU 


3604 


102 


000654 




3605 


103 


000664 


000000 


3606 


104 


000666 


000002 


3607 


105 


000670 


000004 




106 


000672 


000006 


3609 


107 


000674 


000010 


3610 


108 


000676 


000012 




109 


000700 




3612 


110 






3613 


111 




000001 


3614 
3615 


7.4.3 Sample Listing F 


3616 


.MAIN. 


MACRO mill 01 


3617 








3618 








3619 


1 


000000 




3620 


2 






3621 


3 






3622 


4 


000000 




3623 


5 




000000 


3624 


6 




000040 


3625 


7 


000000 


000000 


3626 


8 


000002 


000000 


3627 


9 


000004 


000000 




10 


000006 


000000 


3629 


11 


000010 


000000 


3630 


12 


000012 


000000 


3631 


IS 


000014 


000000 


3632 


14 


000016 


000000 


3633 


15 


000020 


000000 


3654 


16 


000022 


000000 


3635 








3636 
3637 


.MAIN. 


MACRO Mini 01 



000000 



ADD A.B 
ENO lOF FOR I 
i BEGIN EXAMPLES 

BEGIN ALPHA 

FOR RO :- 0 TO 167 
MOVB A(RO).B 
IF B LT 0 THEN LEAVE ALPHA 
END I OF FOR RO 
FOR RO :- 400 TO 567 

IF B GE 0 THEN LEAVE ALPHA 
ENO lOF FOR RO 
ENO ALPHA 
itRETURN EXAMPLES 
(RETURN 
IRETURN ERROR 
(RETURN NOERROR 
;CASE EXAMPLES 

MOV A , RO 

CASE RO 
A 
B 
C 
D 
t 
F 

END ;0F CASE RO 



PAGE 2 



.END 



.ENABL ABS 

.ENABL AMA 

.MCALL .SUPER 

.SUPER 

LSTIt-0 

BITS-40 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 



CVMJA80 rSVll-J MEMOftY DIAG. 



HACRO Y05.02 Monday 07 -Oct -85 16:57 Pao* 89 



SEQ ooas 





18 










jLET 


EXAMPLES 




19 


000024 










LET RO : ■ A 






000024 


013700 


000000 






nOV A.RO 




20 


000030 










LET B :■ C ♦ 0 


SMS 




000030 


013737 


0OOOO4 


000002 




flOV C.B 






000036 


063737 


000006 


000002 




ADD D.B 




21 


000044 










LET E :- F . 1 


SA4& 




000044 


013737 


000012 


000010 




nOV F.E 


S&47 




000052 


005237 


000010 






INC E 


MAS 


22 


000056 










LET G :• H ♦ 2 


S649 




000056 


013737 


000016 


000014 




nOV H.G 


3650 




000064 


062737 


000002 


000014 




ADD 2.G 


S651 


23 


000072 










LET J :- J ♦ 01 


S652 




000072 


062737 


000001 


000022 




ADO 01 . J 


S65S 


24 


000100 










LET A :B- B 


S6S4 




000100 


113737 


000002 


000000 




nOVB B.A 


S655 


25 










J IF 


EXAMPLES 


S656 


26 


000106 










IF A IS TRUE 


5657 




000106 


005737 


000000 






TST A 


3658 




000112 


001403 








BEQ LO 


3659 


27 


000114 


012737 


000023 


000006 




MOV 23. D 


3660 


28 


000122 










ENO tOF IF A 


3661 




000122 








LO: 




3662 


29 


000122 










IF B IS FALSE 


3663 




000122 


005737 


000002 






TST B 


3664 




000126 


001003 








BNE LI 


3665 


30 


000130 


012737 


000034 


000010 




MOV 34. E 


3666 


31 


000136 










ENO (OF IF B 


3667 




000136 








LI: 




3668 


32 


000136 










IF A EQ B THEN LET 


3669 




000136 


023737 


000000 


000002 




CMP A.B 


3670 




000144 


001003 








BNE L2 


3671 




000146 


013737 


000006 


000004 




MOV D.C 


3672 




000154 








L2: 




3673 


33 


000154 










IF A LT B 


3674 




000154 


023737 


000000 


000002 




CMP A.B 


3675 




000162 


002004 








BGE L3 


3676 


34 


000164 


013737 


000004 


000006 




MOV CD 


3677 


35 


000172 










ELSE 


3676 




000172 


000403 








BR L4 


3679 




000174 








L3: 




3680 


36 


000174 


013737 


000010 


000006 




MOV E.D 


3681 


37 


000202 










ENO J OF IF A 


3682 




000202 








L4: 




3683 


38 


000202 










IF A EQ B ANO C NE 


3684 




000202 


023737 


000000 


000002 




CMP A.B 


3685 




000210 


001007 








BNE L5 


3686 




000212 


023737 


000004 


000006 




CMP CO 


3687 




000220 


001403 








BEQ L5 


3688 


39 


000222 


013737 


000012 


000014 




MOV F.G 


3689 


40 


000230 










ENO :0F IF A 
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SEQ 0069 



5«91 
5692 
5693 
5694 
5695 
5696 
5697 
5696 
5699 
5700 
5701 
5702 
5705 
5704 
5705 
5706 
5707 
5706 
5709 
5710 
5711 
5712 
5715 
5714 
5715 
5716 
5717 
5716 
5719 
5720 
5721 
5722 
5725 
57r'4 
5725 
5726 
5727 
5726 
5729 
5750 
5751 
5752 
5755 
5734 
5735 
3736 
5757 
3736 
5759 
5740 
5741 
5742 
5745 



000250 L5: 
41 000250 

000250 025757 000000 000002 

000256 001404 

000240 025757 000004 000006 

000246 001405 



.MAIN. MACRO Mllll Ol-APR-79 16:10 PAGE 5-1 



IF A EQ B Oft C NE 0 
CMP A.B 
BEQ L6 
CMP CO 
BEQ L7 





000250 








L6: 




42 


000250 


015757 


000012 


000014 




MOV F , G 


45 


000256 










END ! OF IF A 




000256 








L7: 




44 


000256 










IFB A EQ B AND C EQ 




000256 


125737 


000000 


000002 




CMPB A.B 




000264 


001010 








BNE LIO 




000266 


025727 


000004 


000001 




CMP C. 1 




000274 


001004 








BNE LIO 


45 


000276 


015757 


000016 


000022 




MOV H , J 


46 


000304 










ELSE 




000304 


000405 








BR Lll 




000506 








LIO: 




47 


000506 


013737 


000010 


000022 




MOV E . J 


48 


000314 










END sOF IFB A 




000314 








Lll: 




49 


000314 










IFB A EQ B ANOB C EQ 




000314 


123737 


000000 


000002 




CMPB A,B 




000322 


001010 








BNE L12 




000524 


123727 


000004 


000001 




CMPB C. 1 




000552 


001004 








BNE L12 


50 


000534 


013757 


000016 


000022 




MOV H.J 


31 












CI cc 




000342 


000405 








BR L13 




000344 








L12: 




52 


000344 


015757 


000010 


000022 




MOV E . J 


55 


000352 










END lOF IFB A 




000352 








L13: 




54 


000552 










IF RESULT IS EQ 




000552 


001005 








BNE L14 


55 


0003S4 


013737 


000000 


000002 




MOV A.B 


56 


000362 










END J OF IF RESULT 




000362 








L14: 




57 


000362 










IF BIT5 SET. IN A 




000362 


032757 


000040 


000000 




BIT BIT5.A 




000370 


001403 








BEQ L15 


56 


000372 


013737 


000002 


000004 




MOV B.C 


59 


000400 










END i OF IF BIT5 




000400 








L15: 




60 


000400 










IF BIT5 OFF. IN A 




000400 


032737 


000040 


000000 




BIT BITS. A 
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91 



SEQ 0090 



3745 


61 


000410 


013737 


000004 


000006 


MOV CD 


3746 
3747 


62 


000416 








END lOF ir BITS 


3740 




000416 








L16: 


3749 


65 










i ON. ERROR IS LIKE AN If STATEMENT ON 


3750 


64 










(ON. ERROR EXAMPLES 


3751 


65 


000416 








ON . ERROR 


3752 




000416 


105004 






BCC L17 


3753 


66 


000420 


015757 


000000 


000002 


MOV A.B 


3754 


67 


000426 








ELSE 


3755 




000426 


000403 






BR L20 


3756 




000430 








L17: 


3757 














3750 


68 


000430 


013737 


000004 


000002 


MOV C.B 


3759 














3760 


69 


000456 








END tOF ON. ERROR 


3761 




000436 








L20: 


3762 


70 


000436 








ON.NOERROR 


3763 














3764 














3765 


.HAIN. 


MACRO mill 01 


-APR -79 


16:10 PAGE 3-2 


3766 














3767 














3768 




000436 


103404 






BCS L21 


3769 


71 


000440 


015757 


000004 


000002 


MOV C.B 


3770 


72 


000446 








ELSE 


3771 




000446 


000405 






BR L22 


3772 




000450 








L21: 


3773 


75 


000450 


013737 


000000 


000002 


MOV A.B 


3774 


74 


000456 








END iOF ON.NOERROR 


3775 




000456 








L22: 


3776 


75 


000456 








ON. ERROR THEN LET A :B- B 


5777 




000456 


103003 






BCC L23 


5778 




000460 


115757 


000002 


000000 


NOVB B.A 


5779 




000466 








L23: 


5780 


76 










(FOR EXAMPLES 


5781 


77 


000466 








FOR I :- -5 TO 23 


3782 




000466 


012757 


177773 


000020 


MOV -5.1 


5785 




000474 








BO: 


5784 


70 


000474 


00S257 


000000 




INC A 


5785 


79 


ooosoo 








END lOF FOR I 


3786 




000500 


005237 


000020 




INC I 


5787 




000504 


023727 


000020 


000023 


CMP I. 25 


9708 




000512 


005770 






BLE BO 


5789 




000514 








EO: 


3790 


80 


000514 








FOR RO :- 0 TO 140 BY 4 


3791 




000514 


005000 






CLR RO 


3792 




000516 








Bl: 


5793 


81 


000516 


^5560 


000000 




DEC A(RO) 


5794 


82 


000522 








END lOF FOR RO 


5795 




000522 


062700 


000004 




ADO 4.R0 


5796 




000526 


020027 


000140 




CMP RO. 140 
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SCO 0091 



Y74A 




000552 


003771 


S799 

' WW 




000554 




WW 


65 


000554 




SAOl 




000554 


012757 






000542 




500 S 


64 


000542 


065757 


SA04 


65 


000550 








000550 


162757 


5606 




000556 


023727 


5607 




000564 


002366 


S606 




000566 




S609 


66 






5610 


67 


000566 




5611 




000566 




5612 


66 


000566 




5615 




000566 


005000 


5614 




000570 




5615 


69 


000570 


116057 


5616 


90 


000576 




5617 




000576 


005757 


5616 




000602 


002415 


5619 


91 


000604 




5620 




000604 


005200 


1921 




000606 


020027 


5622 




000612 


005766 


5625 




000614 




5624 


92 


000614 




5625 




000614 


012700 


5626 








5627 
5626 


.HAZN. 


nACRO mill 01 


5629 








5650 








5651 




000620 




5652 


95 


000620 




5655 




000620 


005757 


56 34 




000624 


002004 


5655 


94 


000626 




S656 




000626 


005200 


56S7 




000650 


020027 


5656 




0006S4 


003771 


5659 




000656 




5640 


95 


000656 




5641 




000656 




5642 


96 






5645 


97 


000656 




5644 




000656 


000207 


5645 


96 


000640 




5646 




000640 


000261 


5647 




000642 


000207 


5646 


99 


000644 




5649 




000644 


000241 


S6S0 




000646 


000207 



000155 

000000 

000002 
000020 



000020 

000002 

000020 
000005 



El: 



B2: 



BtE Bl 

rOR I :- 155 OOUNTO 
MOV 155.1 



3 BY 2 



ADD A.B 

END lOF FOR 1 
SUB 2.1 
CMP I, 5 
BGE B2 

E2: 

i BEGIN EXAMPLES 

BEGIN ALPHA 



000000 
000002 

000167 

000400 



000002 



B5: 
B4: 



FOR RO 
CLR RO 



- 0 TO 167 



E4: 



MOVB 

IF B LT 
TST B 
BLT E5 

END iOF FOR RO 
INC RO 
CMP RO. 167 
BLE B4 



A(RO).B 
0 THEN LEAVE ALPHA 



FOR RO :- 
MOV 400. RO 



400 TO 567 



B5: 

IF B GE 0 THEN LEAVE ALPHA 
TST B 
BGE E5 

END lOF FOR RO 
INC RO 
CMP RO. 567 
BLE B5 

ES: 

END ALPHA 

E5: 

itRETURN EXAMPLES 
(RETURN 
RTS PC 

IRE TURN ERROR 

SEC 

RTS PC 

*RETURN NOERROR 

CLC 

RTS PC 
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SEQ 009? 



56S2 
56S5 
38S4 
S85S 
5856 
5857 
5858 
5859 
5860 
3861 
5862 
5865 
5864 
3865 
5866 
5867 
5868 
3869 
5870 
3871 
3872 
3875 
3874 
3875 
3876 
3877 
5878 
5879 
5880 
3881 
3882 
3885 
3884 
3885 
3886 
3887 
3888 
3889 
389C 
3891 
5892 
589S 
5894 
5695 
5896 
5697 
5698 
S899 
5900 
5901 



100 

101 000650 

102 000654 
000654 
000656 
000660 

105 000664 

104 000666 

105 000670 
1C6 000672 

107 000674 

108 0006/6 

109 000700 
000700 
000700 
000702 
000704 

110 
111 



013700 000000 

010046 
006316 

004757 000700 

000000 

000002 

000004 

000006 

OOOOlO 

000012 



062616 
015646 
004756 

000001 



iCASE EXAMPLES 
MOV 



L24: 



A.RO 
CASE M 
MOV RO.-(SP) 
ASL 8SP 
JSR PC.L24 
A 
B 
C 
0 
E 
F 

END 



(OT CASE RO 



AOO (SP)*.aSP 
MOV 8(SP)».-(SP) 
JSR PC.8(SP)» 

.END 



7.5 M««ory Manag«M«nt Mapping 

7.5.1 Manory Managawnt Mapping Tor Tha 11/85 

PAR SUPERVISOR KERNEL 



0 
1 
2 
5 
4 
5 
6 
7 



Program 
Program 
Program 
Taat Area 
Taat Araa 
Tast Araa 
Tast Araa 
Par if Paga 



Program 
Program 
Program 
Program 
Program 
Program 
Map to CSR' 
Par i f Paga 



USER 

Dat Bk/Fat Mam 
Src Bk/Fat Mam 
Src Bk/Fat Mam 
Src Bk/Fat Mam 
Oat Bk/Fat Mm 
Oat Bk/Fat Mam 
Dst Bk/Fat Mm 
Dat Bk/Fat Mam 



7.5.2 Mamor 

PAR 

0 
1 
2 
5 
4 
5 
6 
7 



y Managamant Mapping For QBUS-ll's Uith Suparvisor Moda (ag 11/25B) 
SUPERVISOR KERNEL USER 



Program 
Program 
Program 
Taat Araa 
Taat Araa 
Taat Area 
Taat Araa 
Par if Paga 



Program 

Program 

Program 

Program 

Program 

Program 

Map to CSR's 

Par i f Paga 



Dat Bk 
Src Bk 
Src Bk 
Src Bk 
Dat Bk 
Dat Bk 
Dat Bk 
Oat Bk 
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590S 




5904 


7.5.5 


5»05 




5906 


PAR 


5907 




5900 


C 


3909 


1 


5910 


2 


5911 


5 


5912 


4 


5915 


5 


5914 


6 


5915 


7 



KERNEL 



USER 



Program 
frogrmm 
Program 
Program 
Program 
Program 
Map to CSR 
Per if Paga 



Program/Ost Bk 
Program/Src 8k 
Program/ Src Bk 
Test Araa/Src Bk 
Tast Area/Oat Bk 
Test Araa/Oat Bk 
Tast Araa/Ost Bk 
Per If Page/Dst Bk 
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SCO 0094 



3919 

3920 000000 

5921 

3922 

5925 

5924 

5925 

5926 

5927 

5928 

5929 

5950 

5951 

5952 

5955 

5954 

5955 

5956 

5957 000000 

5958 165000 

5959 000001 
5940 000000 



.LIST TOC 

.LNABL ABS 

. ENA8L AHA 

. OSABL G8L 

jNOTE: CWMJAO.SML IS THE SUPER. MAC SOURCE AND IS RELEASED MITH 
;THIS PROGRAM. ALL THESE .MCALL STATEMENTS REFERENCE THAT TILE. 

.MCALL SMACIT. . .PUSH. , .POP. . .TAG. . .BRAN. .EMIT. .EMJTN. .EMITL . .EMITP 

.MCALL .IFQPR. .IS. .GENBR. .QPAOO. .QPSUB. CLEAR. SET. CLEARS. SETB 

MCALL RNE . REQ . RLT . RGE . RGT , RLE . RPL . RMI . RHI . RLOS . RHIS . RLO . RCS . RCC 

.MCALL If . .OR. . IF ARI. .LEAVE. . GOTO. OR, AND. THEN. ELSE. UMILE. CASE 

. MCALL FOR . TO . OOWNTQ . REPEAT .UNTIL . 'HRU . END . BEGIN 

. MCALL » »ENO . LE A VE . JUMPTO . GOTO . PUSH . POP , LET 

. MCALL . SIMPLE . . ARITH , ORB . ANOB . IFB . UNT ILB . UHILEB . ON . ERROR . ON . NOERROR 

.MCALL ICALL . IRETURN 



.NLIST 

.LIST 

.NLIST 

LSTII- 

ISUR- 

ITN- 

SMACIT 



TTM 

MC.SYM 

10.CND.ME 

0 

165000 
1 



J I WANT FAT PAPER! 

sLIST MACRO CALLS. SYMBOL TABLE 

tOON'T LIST MACRO DEFS C CONDITIONALS £ EXPANSIONS 
s DEFINED TO LIST SUPERMAC EXPANSIONS 
:USE THESE SYSMAC SWITCHES 
:FIRST TEST NUMBER TO ONE(l) 
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DEFINE TRAPS 



















XQA7 
























3955 




3954 




3955 




3956 




5957 




3958 




3959 




3960 




3961 




3962 




3963 




3964 




3965 




3966 




3967 




3966 




3969 




3970 




3971 




3972 




3973 




3974 


104401 


3975 


104402 


3976 


104403 


3977 




3978 


104405 


3979 




3980 




3981 


104407 


3982 


104410 


3983 




3984 


104411 


3985 


104412 


3966 


104413 


3987 


104414 


3968 




3989 


104415 


3990 


104416 


3991 




3992 


104417 


3993 




3994 


104420 


3995 


104421 


3996 


104422 


3997 




3996 


104423 


3999 


104424 
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.SBTTL DEFINE TRAPS 
jALL ENTRIES HERE MUST HAVE A CORRESPONDING ENTRY IN THE 
,TRAP TABLE "ITRPAO" CNEAR END OF PROGRAM). 
i*TRAP DEFINITIONS 

IhERE IS HOU TRAPS WORK IN THIS PROGRAM 

IalL TRAPS EXECUTE A "TRAP" INSTRUCTION WHICH TAKES THE PROGRAM 
:T0 SYMBOLIC LOCATION "ITRAP" 

I AT ITRAP THE PROGRAM PICKS UP THE RIGHT BYTE OF THE TRAP INSTRUCTION 
iAND INDEXES INTO A TABLE AT LOCATION "»TRPAD" WHICH SENDS THE PROGRAM TO 
iTHE SPECIFIC ROUTINE TO HANDLE THAT SPECIFIC TRAPS TASK. 

I THE ULTIMATE DESTINATION OF A TRAP INSTRUCTION CAN BE GUESSED AT AS FOLLOWS 



SEQ 0095 



I 



(EXAMPLE: 



NOP 

NOP 

NOP 

KERNEL 

NOP 



! ENTER KERNEL MODE 



ADO A DOLLAR SIGN TO THE SYMBOLIC NAME AND CHECK THE CRF FOR SOMETHING CLOSE 
IN THIS CASE THE CRF HAS tKERNE LISTED AS 032546 
AT LOCATION 32546 YOU FIND THE ROUTINE IKERNEL 



NOTE THAT CRF SYfWOLS ARE TRUCNATED TO 6 CHARACTERS 
SYMBOLIC NAMES GREATER THAT 6 CHARACTERS ARE USED SO I 
REMEMBER WHAT THEY MEAN! 



CAN 



ALL GOOD TRAP ROUTINES RETURN VIA AN "RTI" INSTRUCTION 
!,TTY TYPEOUT ROUTINE 

ssTYPE OCTAL NUMBER (WITH LEADING ZEROS) 
siTYPE OCTAL NUMBER (NO LEADING ZEROS) 
J, TYPE OCTAL NUMBER (AS PER LAST CALL) 
;.TYPE DECIMAL NUMBER (WITH SIGN) 
jiTYPE BINARY (ASCII) NUMBER 

iiGET SOFT-SWR SETTING 
itTEST FOR CHANGE IN SOFT-SUR 

jsTTY TYPEIN CHARACTER ROUTINE 
jsTTY TYPEIN STRING ROUTINE 
I (READ AN OCTAL NUMBER FROM TTY 
(iREAD A DECIMAL NUMBER FROM TTY 

1 1 SAVE R0-R5 ROUTINE 
{(RESTORE R0-R5 ROUTINE 

! ENTER KERNEL MODE 

sTURN ON MEMORY MANAGEMENT 6 TRAPS 
:rURN OFF MEMORY MANAGEMENT £ TRAPS 
J MAP KERNEL 1 TO 1 

sTURN ON CACHE 
J TURN OFF CACHE 



TYPEIT- 


104401 


TYPOC- 


104402 


TYPOS- 


104403 


jTYPON- 


104404 


TYPDS- 


104405 


jTYPBN- 


104406 


GTSUR- 


104407 


CKSUR- 


104410 


RDCHR- 


104411 


RDLIN- 


104412 


RDOCT- 


104413 


RODEC- 


104414 


SAVREG- 


104415 


RESREG- 


104416 


KERNEL- 


104417 


ENERGIZE 


-104420 


0EENERGIZE>104421 


KMAP- 


104422 


CACHON- 


104423 


CACHOFF- 


104424 



CvnjABO nSVU-J nenORY OIAG. nACRO Y0S.02 nonday 07 
DEFINE TRAPS 



4000 








4001 


104425 


LOADCSR 


■104425 


4002 


104426 


nP AAA ^ A 

rEADCSR 


■104426 


4003 








4004 


104*27 


PERROl • 


104427 


400S 


104430 


rtRR02" 


« AA A V A 

104450 


4006 


104431 


rcRROS" 


104431 


4007 


104432 


rERR04" 


104432 


4006 


104433 


PERROT" 


« AA AW 

104433 


M AAA 

4009 


104434 


rERRlO" 


1 AA A VA 

104434 


4010 


104435 


PERRll" 


104435 


4011 


10443O 


PERR12" 


104430 


4012 


1 A^ A V ^ 

104457 


PERR13" 


4 A A 

104437 


4013 


104440 


rcRR14" 


4 A A AAA 

104440 


4014 


104441 


PERR15" 


4 AA A A 4 

104441 


4015 


104442 


PERRlO" 


4 AA A A 1 

104442 


4016 


i A^ ^ il V 

104443 


PERR17" 


4 AA AAV 

104443 


4017 


104444 


PERR20" 


4 AA AAA 

104444 


4016 


104443 


rERR21" 


104445 


4019 


4 AA A A £ 

104446 


rERR22" 


4 A A A A£ 

104440 


4020 


4 AA A A ^ 

10444 ^ 


rERR23" 


10444 1 


4021 


104450 


DC DO OA a 


1U443U 


4022 


104451 


PERR25" 


4 AA 

I04451 


4023 


1044D^ 


rcHKco" 


104*Di 


4024 


1 AAA W 


renn*: f ■ 


10**33 


40Z5 


104434 


DCDDYAa 


1044j4 


402o 


104433 


DCDDV1 ■ 

rtHK31" 


1U4*33 


4097 




PERR32" 


104456 


4026 


104457 


PERR33- 


104457 


4029 


104460 


PERR34- 


104460 


4030 


104461 


PERR35- 


104461 


4031 


104462 


PERR36- 


104462 


4032 


104463 


PERR37- 


104463 


4033 


104464 


PERR40- 


104464 


4034 


104465 


PERR41- 


104465 


4035 


104466 


PERR42- 


104466 


4036 


104467 


PERR43- 


104467 



16:57 Pag* 98 1 



SEQ 0096 



iLOAO CORRECT CSR 
{READ CORRECT CSR 

; PROGRAM DETECTED ERROR 
i PROGRAM DETECTED ERROR 
iPROGRAn DETECTED ERROR 
j PROGRAM DETECTED ERROR 
t PROGRAM DETECTED ERROR 
{PROGRAM DETECTED ERROR 
(PROGRAM DETECTED ERROR 
{PROGRAM DETECTED ERROR 
(PROGRAM DETECTED ERROR 
(PROGRAM DETECTED ERROR 
(PROGRAM DETECTED ERROR 
(PROGRAM DETECTED ERROR 
(PROGRAM DETECTED ERROR 
(PROGRAM DETECTED ERROR 
(PROGRAM DETECTED ERROR 
(PROGRAM DETECTED ERROR 
(PROGRAM DETECTED ERROR 
I PROGRAM DETECTED ERROR 
(PROGRAM DETECTED ERROR 
(PROGRAM DETECTED ERROR 
(PROGRAM DETECTED ERROR 
(PROGRAM DETECTED ERROR 
(PROGRAM DETECTED ERROR 
(PROGRAM DETECTED ERROR 
(PROGRAM DETECTED ERROR 
(PROGRAM DETECTED ERROR 
(PROGRAM DETECTED ERROR 
(PROGRAM DETECTED ERROR 
(PROGRAM DETECTED ERROR 
(PROGRAM DETECTED ERROR 
(PROGRAM DETECTED ERROR 
(PROGRAM DETECTED ERROR 
(PROGRAM DETECTED ERROR 



CVnjAaO nSVll-J memory OZAG. macro YOS.OZ Monday 07-Oct- 
OEFINE TRAPS 



4057 






4038 


104470 


ECCDIS' 104470 


4039 


104471 


ECCIDIS" 104471 


4040 


104472 


ECCINIT"104472 


4041 


104473 


PA#^4 _ « AA 

ECCIINIT •104473 


4042 


104474 


CBCSR^ 104474 


4043 


104475 


CBICSR" 104475 


4044 


104476 


WAddDC* 104476 


4045 


104477 


WAdldDC ■ 1044 7 7 


4046 


104500 


UnbDoc" 104500 


4047 


104501 


UAblDBc* 104301 


4048 


104502 


CLRCbn" 104302 








4050 


104504 


CHKOIS- 104504 


4051 


104505 


CHKIDIS- 104505 


4052 


104506 


ENASBE- 104506 


4033 


104507 


ENAlSBE-104507 


4054 


104510 


TSTREAO-104510 


4055 


104511 


INVALIO-104511 


4056 


104512 


ERRGEN -104512 


4057 


104513 


CBREG -104513 


4058 


104514 


SYNRE6 -104514 



16:57 Pag* 98-2 



SEQ 0097 



DISABLE ECC ON ALL CSR'S 

DISABLE ECC ON 1 SELECTED CSR 

INITIALIZE ALL ECC CSR'S 

INITIALIZE 1 SELECTED ECC CSR 

WRITE GENERATED CHECKBITS IN ALL CSR'S 

WRITE GENERATED CHECKBITS IN 1 SELECTED CSR 

taAS THERE A SBE ON ANY CSR? 

WAS THERE A SBE ON 1 SELECTED CSR? 

WAS THERE A QBE ON ANY CSR? 

WAS THERE A OBE ON 1 SELECTED CSR? 

CLEAR ALL CSR'S 

CLEAR 1 SELECTED CSR 

DISABLE ECC £ WRITE CHECKBITS FROM ALL CSR'S 
DISABLE ECC £ WRITE CHECKBITS TROM 1 SELECTED CSR 
ENABLE TRAPS ON SBE'S TROM ALL CSR'S 
ENABLE TRAPS ON SBE'S FROM 1 SELECTED CSR 
TEST LOC (Rl) £ TST FOR SBE (WITHOUT FETCHES) 
INVALIDATE BACKGROUND PATTERN ON "BANK" 
CHECK ERROR ADDRESS 
ENABLES CHECKBIT REGISTER 
ENABLES SYNDROME BIT REGISTER 



cvnjAeo nsvii-j ncnoRY diag. 

OEFINC BASIC PDPll STUFF 



4061 
4062 
4063 
4064 
4065 
4066 
4067 
4066 
4069 
407'/ 
40-i 
4072 
4073 
4074 
4075 
4076 
4077 
4076 
4079 
4060 
4061 
4062 
4063 
4064 
4065 
4066 
4067 
4088 
4069 
4090 
4091 
4092 
4093 
4094 
4095 
4096 
4097 
4098 
4099 
4100 
4101 
4102 
4103 
4104 
4105 
4106 
4107 
4106 
4109 
4110 
4111 
4112 
4113 
4114 
4115 
4116 
4117 



0vr2000 
002000 
000740 
000700 
104000 
000004 
177776 



177570 
177570 
177546 



000011 
000012 
C00015 
000200 
000007 



000006 
000006 



100000 
040000 
020000 
010000 
004000 
002000 
001000 
000400 
000200 
000100 
000040 
0OOU20 
000010 
000004 
000002 
000001 



100000 
040000 
020000 
010000 
004000 
002000 
001000 
000400 



riACRO Y0S.02 tlonday 07-Oct-eS 16:57 Pag* 100 



.SBTTL DEFINE BASIC POPll STUFF 



SEQ 0096 



{•INITIAL ADDRESS 
STACK- 2000 
KERSTK- STACK 
SUPSTK- 740 
USESTK- 700 
ERROR -EMT 
SCOPE -lOT 
PSU- 177776 
,STKLMT-177774 
iPIRQ- 177772 
OSWR- 177570 
DOISP- 177570 
LKS- 177546 



OF THE STACK POINTER 

1 1 FIRST ADDRESS OF THE STACK 

iiKERNEL STACK 

I {SUPERVISOR STACK 

I (USER STACK 

iiBASIC DEFINITION OF ERROR CALL 

SjBASIC DEFINITION OF SCOPE CALL 

t (PROCESSOR STATUS UORD 

J t STACK LIMIT REGISTER 

1 1 PROGRAM INTERRUPT REQUEST REGISTER 

tt HARDWARE SWITCH REGISTER 

i {HARDWARE DISPLAY REGISTER 

:tLINE CLOCK (KWll-L) STATUS REGISTER 



(•MISCELLANEOUS DEFINITIONS 



HT- 
LF- 

CR" 

CRLF- 

WPT" 



11 
12 
15 
200 

7 



;iC0DE FOR HORIZONTAL TAB 
:>CODE LINE FEED 
iiCODE CARRIAGE RETURN 
itCODE FOR CARRIAGE RETURN-LINE FEED 
I (CODE FOR PROCESSOR TYPE INSTRUCTION 



{•GENERAL PURPOSE REGISTER DEFINITIONS 
jSP-R6 jiSTACK POINTER 

jKSP-SP I {KERNEL STACK POINTER 

SSP-SP {{SUPERVISOR STACK POINTER 

USP-SP {{USER STACK POINTER 

(PC-R7 {{PROGRAM COUNTER 

{•"SWITCH REGISTER" SWITCH DEFINITIONS 



SW15' 
SW14- 
SW13' 
SW12' 
SW11< 
SWIO- 
SW9- 
SW8- 
SW7- 
SW6- 
SW5- 
SU4- 
SU3- 
SU2- 
SUl- 
SWO- 



100000 
40000 
20000 
10000 
4000 
2000 
1000 
400 
200 
100 
40 
20 
10 
4 
2 
1 



{•DATA BIT DEFINITIONS (BITOO TO BIT15) 

BIT15- 100000 

BIT14- 40000 

BIT13- 20000 

BIT12- 10000 

BITll- 4000 



BITIO* 

BIT9- 

BIT8- 



2000 
1000 
400 



CvnjABO nsvii-j nEnoRY oiag. 
DEFINE BASIC PDPll STUFF 
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SEQ 0099 



411S 
4119 
4120 
4121 
4122 
4123 
4124 
4125 
4126 
4127 
4126 
4129 
4130 
4131 
4132 
4133 
4134 
4135 
4136 
4137 
4138 
4139 
4140 
4141 
4142 
4143 
4144 
4145 
4146 
4147 
4148 
4149 
4150 
4151 
4152 
4155 

4i:*4 

4155 
4156 
4157 
4158 
4159 
4160 
4161 
4162 
4163 
4164 
4165 
4166 
4167 
4168 
4169 
4170 
4171 
4172 
4173 
4174 



000200 
000100 
000040 
000020 
000010 
000004 
000002 
000001 



000004 
000010 



000020 
000024 
000030 
000034 
C00060 



000114 
000114 

000250 



177746 
177750 

177754 
177766 



177572 
177574 
177576 
172516 



177600 



BIT7- 
BIT6- 
BIT5" 
BZT4- 
BIT3- 
BIT2- 
BITl- 
BITO- 



200 

100 

40 

20 

10 

4 

2 

1 



14 
14 



I •BASIC "CPU 
ERRVEC- 4 
RESVEC- 10 
iTBITVEC-14 
jTRTVEC- 
jBPTVEC- 
lOTVEC- 20 
PURVEC- 24 
EMTVEC- 30 
TRAPVEC-34 
TKVEC- 60 
jTPVEC- 64 
iLKVEC- 100 
CACHVEC-114 
PARVEC-CACHVEC 
;PIRQVEC-240 
mVEC- 250 

. SBTTL DEFINE 
iMEMERR - 177744 
CONTRL - 177746 
MAINT - 177750 
jHITMIS - 177752 
DATARG - 177754 



TRAP VECTOR ADDRESSES 

tsTIME OUT AND OTHER ERRORS 
i {RESERVED AND ILLEGAL INSTRUCTIONS 
jj"T" BIT 

,1 TRACE TRAP 
I {BREAKPOINT TRAP (BPT) 
I i INPUT/OUTPUT TRAP (lOT) **SCOPE** 
i:POUER FAIL 

mEMULATOR trap (EMT) **ERR0R** 
I ; "TRAP" TRAP 
jiTTY KEYBOARD VECTOR 
sjTTY PRINTER VECTOR 
:iLINE CLOCK (KUll-L) VECTER 
:: CACHE ERROR INTERRUPT VECTOR 



:s PROGRAM INTERRUPT REQUEST VECTOR 
;: MEMORY MANAGEMENT VECTOR 
CACHE REGISTERS 

:i CACHE ERROR REGISTER 

I (MEMORY CONTROL REGISTER 

I (MEMORY MAINTENENCE REGISTER 

(jHIT MISS REGISTER "1" IMPLIES HIT IN CACHE 

::DATA REGISTER 



.SBTTL DEFINE CPU REGISTERS 
CPUERR - 177766 < iCPU ERROR REGISTER HOLDS CONDITION THAT CAUSED 

.SBTTL DEFINE MEMORY MANAGEMENT REGISTERS 

i*MEMORY MANAGEMENT STATUS REGISTER ADDRESSES 
MMRO- 177572 
MMRl- 177574 
MMR2- 177576 
MMR3- 172516 



(*USER 
UIPDRO- 177600 
jUIPDRl- 
{UIPDR2- 
,UIPDR3- 
1UIPDR4- 
IUIPDR5- 
SUIPDR6" 
8UIPDR7- 



"I" PAGE DESCRIPTOR REGISTERS 

177602 
177604 
177606 
177610 
177612 
177614 
177616 



tUDPDRO- 
jUDPDRl- 
IUDP0R2- 



I *USER 



"D" PAGE 
177620 
177622 
177624 



DESCRIPTOR REGISTORS 



CVHJABO MSVll-J MEMORY OIAG. MACRO Y05.02 
DEriNE MEMORY MANAGEMENT REGISTERS 









4175 






4177 






4178 






4179 






A 1 AA 

410U 






^ f A 1 
4101 






4 lOc 


1 771^0 
A ' ' O^W 


FASTCITY 


4 lOO 


1 77<lAO 
A • f O^V 


UTPAROs 


A 1 

4104 


1 77&A9 


IITPAB1 ■ 

wA~WWX 




1 77IIAA 


wA~WWt 


4100 


A ' f O^O 




A1 AT 

41a r 


A r ' 03V 


IITPARAa 


A 1 AA 

^ loo 


A f (0^£ 




A1 AO 

4l0Tr 


1 77A^ 




A 1 OA 




ilJIPAR7a 


A1 41 












A1 


177660 

All WW V 


UDPARO- 


A 1 OA 




lUOPARla 


A1 O^ 




>LI0PAR2a 


A 1 04L 




lUDPARSa 


A1 07 
4 17 f 




iUDPARAa 


A 1 OA 




iU0PAR5> 


A1 OO 
^ ITT 




>U0PAR6a 

i WW' W 




177676 


U0PAR7" 












SIPORO- 




172200 






iSIPDRl* 


4cV J 




iSIPDR2> 


VO 




iSIPORS' 


4cV ' 




,SIPDR4> 


A3AA 




1 SIP0R5> 


A900 




iSIP0R6- 


A91 O 




iSIPORT" 


A91 1 






4212 




tSDPDRO- 


421S 




A?1 A 




> SOPOR 1- 


A31 ^ 




1 S0P0R2> 

f W*Vfc 


A31f> 
AD 




s SOPORS" 


A21 7 




iS0P0R4- 


A21 A 

AO 




•SOPORS- 


A21 O 




iS0P0R6- 


A22fl 
^ccV 




,S0P0R7> 


A291 






4222 




SIPAK^- 


4223 


172240 


4224 




iSIPARl- 


4225 




iSIPAR2- 


4226 


172246 


SIPAR3- 


4227 




iSIPAR4- 


4228 


172252 


SIPAR5- 


4229 


172254 


SIPAR6- 


4230 




iSIPAR7- 


4231 
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177626 
177630 
177632 
177634 
177636 

i*USER "I" PAGE AOORESS REGISTERS 



SEQ 0100 



177656 



(PATTERN PROGRAM SPACE 
{PATTERN PROGRAM SPACE 
{PATTERN PROGRAM SPACE 
I PATTERN PROGRAM SPACE 
t PATTERN PROGRAM SPACE 
; PATTERN PROGRAM SPACE 
i PATTERN PROGRAM SPACE 

I PATTERN PROGRAM SPACE 



(•USER 
177660 



177676 



"0* 



177662 
177664 
177666 
177670 
177672 
177674 



PAGE AOORESS REGISTERS 

(PATTERN PROGRAM SPACE 

(PATTERN PROGRAM SPACE 
(PATTERN PROGRAM SPACE 
(PATTERN PROGRAM SPACE 
(PATTERN PROGRAM SPACE 
(PATTERN PROGRAM SPACE 
i PATTERN PROGRAM SPACE 
(PATTERN PROGRAM SPACE 



{•SUPERVISOR "I" PAGE OESCRIPTOR REGISTERS 
172200 

172202 
172204 
172206 
172210 
172212 
172214 
172216 



172220 
172222 
172224 
172226 
172230 
172232 
172234 
172236 



PAGE OESCRIPTOR REGISTERS 



(•SUPERVISOR "I' 
172240 
172242 
172244 
172246 
172250 
172252 
172254 
172256 



PAGE AOORESS REGISTERS 



(TEST AREA 
(TEST AREA 
(TEST AREA 
(TEST AREA 



CvnjABO fISVll-J HEnORY OIAG. fMCRO Y0S.02 
DEFINE fiEnORv HAMGErCNT REGISTERS 



4252 
4255 
4234 
4235 
4256 
4237 
4238 
4239 
4240 
4241 
4242 
4243 
4244 
4245 
4246 
4247 
4246 
4249 
4250 
4251 
4252 
4253 
4254 
4255 
4256 
4257 
4256 
4259 
4260 
4261 
4262 
4263 
4264 
4265 
4266 
4267 
4266 
4269 
4270 
4271 
4272 
4273 
4274 
4275 
4276 
4277 
4278 
4279 
4280 
4281 



172260 



172272 
172274 
172276 



172300 



Monday 07-0ct-85 16:57 PaQ* 100-3 



PAGE ADDRESS REGISTERS 



SEQ 0101 



172340 



172350 
172352 
172354 



172360 



172374 
172376 



i*SUPERVIS0R 'D' 

SDPARO- 172260 

iSOPARl- 172262 

iSDPAR2- 172264 

IS0PAR3- 172266 

IS0PAR4- 172270 

S0PAR5- 172272 

SDPAR6- 172274 

S0PAR7- 172276 

i*KERNEL "I" PAGE DESCRIPTOR REGISTERS 
KIPDRO- 172300 



jKIPDRl- 
|KIPDR2- 
iKIPDRS* 
iKIPDR4> 
iKIPDRS- 
iKIPDR6> 
JKIPDR7" 



172302 
172304 
172306 
172310 
172312 
172314 
172316 



i*KERNEL "0" PAGE DESCRIPTOR REGISTERS 

:KDPDRO- 172320 

tKDPDRl- 172322 

iKDP0R2- 172324 

IK0P0R3- 172326 

iKDPDR4- 172330 

jKDPDRS- 172332 

{KDPDR6- 172334 

iKDPDR7> 172336 

(•KERNEL "I" PAGE ADDRESS REGISTERS 

KIPARO- 172340 

iKIPARl- 172342 

JKIPAR2- 172344 

iKIPAR3- 172346 

KIPAR4- 172350 

KIPAR5- 172352 

KIPAR6> 172354 

IKIPAR7- 172356 

i*KERNEL "D" PAGE ADDRESS REGISTERS 

KDPARO- 172360 

iKDPARl- 172362 

:KDPAR2- 172364 

tKDPARS- 172366 

:KDPAR4- 172370 

,KDPAR5- 172372 

KDPAR6- 172374 

KDPAR7- 172376 



CVnjAeO MSVll-J MEMORY OIAC. 
DEFINE 0-BUS MAP REGISTERS 
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SEQ 0102 



4284 
4285 
4286 
4287 
4288 
4289 
4290 
4291 
4292 
429S 
4294 
4295 
4296 
4297 
4298 
4299 
4300 
4301 
4302 
4303 
4304 
4305 
4306 
4307 
4308 
4309 
4310 
4311 
4312 
4S1S 
4S14 
4315 
4316 
4317 
4318 
4319 
4320 
4321 
4322 
4323 
4324 
4325 
4326 
4327 
4326 
4329 
4330 
4331 
4332 
4333 
4334 
4335 
4336 
4337 
4338 
4339 
4340 



170200 
170202 
170204 



MAPLO 
MAPHO 
MAPLl 
iMAPHl 
|MAPL2 
tMAPH2 
iMAPL3 
|MAPH3 
;MAPL4 
|MAPH4 
jMAPLS 
iMAPHS 
iMAPLe 
iHAPHe 
tMAPL7 
|MAPH7 
iMAPLlO 
iMAPHlO 
t MAPLl 1 
jMAPHll 
tMAPL12 
tMAPH12 
i MAPLl 3 
iMAPHlS 
IMAPL14 
iriAPH14 
iMAPLlS 
SMAPH15 
>MAPL16 
tMAPH16 
,MAPL17 
iMAPH17 
iMAPL20 
iMAPH20 
iMAPL21 
|MAPH21 
IMAPL22 
iMAPH22 
inAPL23 
IMAPH2S 
|HAPL24 
iMAPH24 
iMAPL2S 
iMAPH2S 
|MAPL26 
iMAPH26 
tMAPL27 
IMAPH27 
tMAPLSO 
iMAPHSO 
IMAPL31 
iMAPHSl 
iMAPL32 
inAPHS2 



.SeTTL DEFINE Q-BUS MAP REGISTERS 

i«THE LOWER 16 BITS OF THE MAP REGISTERS ARE LABELED 
s*THE UPPER 6 BITS OF THE MAP REGISTERS ARE LABELED ' 
170200 
170202 
170204 
170206 
170210 
170212 
170214 
170216 
170220 
170222 
170224 
170226 
170230 
170232 
170234 
170236 

170240 

170242 

170244 

170246 

170250 

170252 

170254 

170256 

170260 

170262 

170264 

170266 

170270 

170272 

170274 

170276 

170300 

170302 

170304 

170306 

170310 

170312 

170314 

170316 

170320 

170320 

170324 

170326 

170330 

170332 

170334 

170336 

170340 

170342 

170344 

170346 

170350 

170352 



•MAPLXX" 
MAPHXX' 



CvnjASO nsvii j rcnoRr oiag 

DEFINE Q-BUS MP REGISTERS 

4541 
4542 
4543 
4344 
4545 
4546 
4547 
4540 
4349 
4350 
43S1 
4552 
4S5S 

4554 000174 

4555 000176 
4556 

4557 

4356 172100 

4359 

4360 

4561 060000 
4362 157776 
4565 040000 



nACRO Y05.02 nonday 07 -Oct -05 16:57 102 1 



SCQ 0103 



it1APL33 
inAPH33 
inM>L54 
, MAPM54 
|HAPL35 
IMAPH55 
inAPL56 
inAPH56 
inAPL57 



170554 
170556 
170560 
170562 
170564 
170566 
170570 
170572 
170574 
170576 



.SeTTL DEFINE SOFTWARE SWITCH C DISPLAY REGISTERS 
OISPREG-174 
SUREG- 176 

.SeTTL DEFINE CONTROL STATUS REGISTERS 
CSRAOD-172100 



.S8TTL 
FIRST -60000 
LAST -157776 
SIZE -40000 



DEFINE PARAMETERS 

(START OF THE 16K TEST PATTERN AREA 
(END OF THE 16K TEST PATTERN AREA 

:SIZE OF THE 16K TEST PATTERN AREA (FOR SOB INSTRUCTIONS) 



5012 

50 1 5 I ••••••#«••***••*••*•••••••****«••••••••*•••••«•*«**•••••••••«••« 

5014 

5015 .NLIST NO tOON'T NEED TO SEE THEN ANY NORE 

5016 

5055 



cvnjAeo nsvxi-j nenofir oiag. 

TRAP CATCHER 



000000 
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SCO 0104 













000000 


5040 


000000 


000000 


5041 




000177 


5045 






5046 






5047 






5048 






5049 






5050 






5051 






5052 






5055 






5054 






5055 






5056 






5057 






5058 






5059 






5060 






5061 




000046 


5062 


000046 


013730 


5063 




000052 


5064 


000052 


040000 


5065 






5066 




000024 


5067 


000024 


000200 


5068 




000042 


5069 


000042 


002000 


507C 




00004/ 


5071 


000044 


0S7020 


5072 




000200 


5073 


000200 


000437 


5074 


000202 


000442 


5075 




000300 


5076 


000900 


005037 


5077 


000504 


000137 


5078 


000310 






000310 


012737 


5079 


000316 


000137 


5060 




002000 



.S8TTL 
.-0 
.WORD 
.RCPT 



TRAP CATCHER 

0.0 
177 



.WORD .*2,HALT 



S8TTL ACTll HOOKS 
THE HOOKS REQUIRED BY ACTll ARE DEFINED AND SETUP 8EL0U: 
DEFINITIONS: 

1) L0C.46 "END -OF -PASS- HOOK 

-ADDRESS OF END OF PASS ROUTINE 
MODIFIED BY ACTll. 

2) L0C.S2 PROGRAM NEEDS HOOK 

BIT 15-1 PROGRAM SHOULD BE POWER 
FAILED UHILE RUNNING 

-0 NO POUER FAIL 
BIT 14-1 PR0GMM1 MEMORY SIZE DEPENDENT 

-0 NOT MEMORY SIZE DEPENDENT 
BIT 13-1 PROGRAM REQUIRES MANUAL INTERVENTION 

-0 MANUAL INTERVENTION NOT REQUIRED 
BITS 12-0 MUST BE ZERO'S 



002626 
003670 

177777 
003670 



002626 



START3: 

STARTl: 
START2! 



.-46 

lENOAD 

.-52 

.WORD 

.SBTTL 

.-24 

200 

.-42 

STACK 

.-44 

lAPTHDR 

.-200 

BR 

BR 

.-300 
CLR 
JHP 
SET 

JHP 

.-STWK 



cDSET L0C.46 TO ADDRESS OF lENOAD IN . *E0P 

BIT14 ii2)SET L0C.S2 TO INDICATE MEMORY SIZE DEPENDANT 

APT 11 HOOKS 

11 SET POUER FAIL TO POINT TO START OF PROGRAM 
I (FOR APT START UP 

iSO RTll CAN START WITH RUN COMMAND 
t (POINT TO APT INDIRECT ADDRESS PNTR. 
i (POINT TO APT HEADER BLOCK 



STARTl 
START2 

RESTART 

START 

RESTART 

START 



; "NORMAL" START 

(RESTART (SAVE ERROR ACCOUNTING) 



MOV •-1. RESTART 



I 



CVHJMO Msvn 



5005 
5064 
5085 
5006 
50«/ 

soee 

5069 
5090 
5091 
5092 
5095 
5094 
5095 
5096 
5097 
5098 
5099 
5100 
5101 
5102 
5103 
5104 
5105 
5106 
5107 
5108 
5109 
5110 
5111 
5112 
5115 
5114 
5115 
5116 
5117 
5118 
5119 
5120 
5121 
5122 
5123 
5124 
5125 
5126 
5127 
5128 
5129 
5150 
5131 
5152 
5155 
5154 
5155 
5196 
5157 
5159 
5159 



002000 
002000 
002002 
002004 
002006 
002010 

002012 
002013 
002014 
002015 
002016 
002020 
002022 
002024 
002026 
002050 
002052 
002054 
002056 
002040 
002044 
002046 
002050 
002052 
002054 
002056 
002060 
002062 
002064 
002066 
002070 
002072 
002074 
002076 
002100 
002102 
002104 
002106 
002110 
002112 
002114 
002116 
002120 
00212^ 
002124 
002126 
Of.2150 
002152 
002154 
0021S6 
002140 
002142 
002144 



000000 



MEMORY piAG 



000000 
000000 
000000 
000000 
000000 

000 
000 
000 
000 
000000 
000000 
000000 
000000 
000000 

cooooo 

000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 



tIACRO y05.02 
TO ZERO 



nonday 07 -Oct 85 16:57 



.SBTTL VARIABLES 
(•THIS TABLE CONTAINS VARIOUS 
i*USEO IN THE PROGRAM. 
♦CMTAG: 
UFOSET.O 
SELONLY:0 
DIAGFLAG:0 
KAMIKAZE :0 
SKIPKAMItO 

<NEXT TUG BYTES ARE DISPLAYED 
tPATMAR: .BYTE 0 
tBANK: .BYTE C 
lERFLG: .BYTE 0 
IITEHB: .BYTE 0 
LASTERROR : . WORD 0 



ERRPC 
BADPC 
ERRSP 
BAOSP 
ERRPSU 



.WORD 
.UORD 
.WORD 
.WORD 
.WORD 



BAOPSU: .WORD 
ADDRESS: .WORD 
PADDRESS: .WORD 
PHY ADD: .UORD 
GOOD: .UORD 



C00D2: 

G00D5: 

BAD: 

BA02: 

BAD5: 



.UORD 
.UORD 
.UORD 
.UORD 
.UORD 



BAOXOR : . UORD 

lAUTO: .UORD 

FATAL I: .UOR' 

SKPERR: .UORD 

NEHCNT: 0 

PARCNT: 0 

PATERR: 0 

NOPAR: 0 

NONEH: 0 

BANK: 0 
BANKINDEX:0 

CPUBIT: 0 

MUT: 0 
PATTERN :0 

KPFLAG : . UORD 



ACFLAG: 
•WFLAG: 
PFLAG: 
RRFLAG: 



.WORD 
.UORD 
.UORD 
,UORD 



RLFLAG: .UORD 
BtlFLAG: .UORD 
EQFLAG; .UORD 
TMFLAG: .UORD 
INTFLAG: .UORD 
INT64K : . UORD 
PMEMFLG: .UORD 



0 
0 
0 
0 
0 
0 
0 
0 

0.0 
0 
0 
0 

0 
0 
0 
0 
0 
0 
0 



0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 



ABORTFLAG: .UORD 0 



Pa«« 117 

SEQ OiOS 

INITIALIZED TO ZERO 
COmON STORAGE LOCATIONS 

I (START OF COMMON TAGS 
(USER FRIENDLY FLAG 

(SELECT ONLY BANKS MARKED BY FIELD SERVICE HOOC FLAG 
(SET FOR SHIFTING DIAGONAL TEST 
(SET FOR KAMIKAZE MODE TESTING 

(USED TO SKIP RESTORING KAMIKAZE NODE UHEN MODIFIED 
IN THE DISPLAY REGISTER 
(PATTERN NUMBER 
(BANK C SIGN 
I (CONTAINS ERROR .AG 
((CONTAINS ITEM CuNTROL BYTE 
(NUMBER OF ERRORS ON LAST PASS 
(CONTAINS PC OF ERROR FOR TYPEOUT 
(CONTAINS PC OF ERROR 
(CONTAINS SP OF ERROR FOR TYPEOUT 
(CONTAINS SP OF ERROR 
(CONTAINS PSU OF ERROR FOR TYPEOUT 
(CONTAINS PSU OF ERROR 
((CONTAINS ADDRESS OF 'BAD' DATA 
(ADDRESS OF PARITY ERROR 
(22 BIT PHYSICAL ADDRESS 
((CONTAINS 'GOOD' DATA 
((CONTAINS 'G0002' DATA 
({CONTAINS 'G0003' DATA 
; (CONTAINS 'BAD' DATA 
{(CONTAINS 'BAD2' DATA 
({CONTAINS ' BADS' DATA 
(XOR OF GOOD C BAD • BAD BITS! 

{(AUTOMATIC MODE INDICATOR FOR APT. ACT. £ XXDP 
{FATAL ERROR INDICATOR 

(USED TO SKIP ERROR MESSAGE IN "lERRGEN" 

:NON-EXISTANT MEMORY COUNTER (HOLES) 

(PARITY ERROR COUNTER 

(PATTERN ERROR COUNTER 

(NO PARITY ERROR MODE INDICATOR 

(NO NON-EXISTANT MEMORY (HOLES) MODE INDICATOR 

(MEMORY BANK UNDER TEST 

{USED TO INDEX INTO CONFIG TABLE 

(CONTAINS 1 BIT TO IDENTIFY CPU TO CONFIGURATION TABLi 
{MEMORY UNDER TFST FLAG 
(PATTERN NUMBER UNDER TEST 
{BANK IS PROTECTED REGION OF ECC 
{BANK CAN BE ACCESSED BY THIS CPU 

{IF SET INDICATES MSVll-J OR MFllS-K UNOtR TEST«»«««««*** ? 
{BANK IS IN PROGRAM SPACE 

{BANK IS UHERE PROGRAM RELOCATION IS REQUIRED TO TEST 

{PROGRAM IS RELOCATED FLAG 

{'■BANK IS IDENTIFIED AS BAD MEMORY" FLAG 

("BANK HAS EQB MEMORY" FLAG 

("TYPE OF MEMORY TO TEST- FLACi 0 • PARITY. I • ECC 
("BANK IS INTERLEAVED" FLAG»«»»*»«««********«*»**«*«*«* ? 
{"BANK IS 64K INTERLEAVED" FLAG»««***«***«««*«***«««*»« ? 

("MEMORY UNDER TEST IS A MSVll-J- FLAG 
("ABORT OCCUREO- FLAG 



CVMJ»«0 ISVll 
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INITIALIZED TO ZERO 



SEO 0106 





140 


002146 


000000 


5 


141 


002150 


000000 


5 


I >2 


002152 


000000 


5 


L43 


002154 


^ AAA A A 

000000 


5 


L44 


002156 


AAAAAA 

000000 


S 


[45 






5 


146 


002160 


AAAAAA 

000000 


5 


>47 


002162 


AAAAAA 

oooooo 


5 


.40 


002164 


AAAAAA 

OOOOOO 


S 


.49 


002166 


AAAAAA 

OOOOvO 


» 


bSO 


002170 


OOOOOO 


S 


151 


002172 


OOOOOO 


5 


.52 


AA*% • 

002174 


OOOOOO 


5 


.55 


002176 


OOOOOO 


5: 


.54 






5 


.55 


AA '^AA 

002200 


OOOOOO 


S 


.36 


AA*^ t A^ 

002202 


OOOOOO 


3, 


.57 


002204 


/\/\AAAA 


5. 




002206 


AAAAAA 


5, 


.59 


AA^ ^ « A 

002210 


AAAAAA 


5c 


.60 


AA^^ \ ^ 

002212 


AAAAAA 

OOOOOO 


5. 


.61 


AA^^ 1 A 

002214 


AAAAi%/\ 


5c 


.62 


AA^^ 9 

002216 


A/\AAAA 

OOOOOO 


s 1 

9. 


.69 


002220 


OOOOOO 


• c 

5c 




AAA AAA 

002222 


AAAAAA 
OOOOOO 


5, 


.65 


AA^9 A^ 

002224 


AAAAAA 

OOOOOO 


5c 


.66 






5c 


.67 


AA^ ^OX. 

002226 


AAAAAA 

OOOOOO 


5c 


.60 


OC)£2 50 


AAAAAA 

OOOOOO 


5. 


,69 


AA^^ 

002252 


AAAAAA 

OOOOOO 


5. 


,70 


AA^ ^ VX 

002254 


AAAAAA 

OOOOOO 


5c 


.71 


AA^^ V& 

002256 


AAAAAA 
OOOOOO 


5c 


.72 


AA^ A 

002240 


AAAAAA 

OOOOOO 


C 4 

5. 


,75 


AA^ ^X ^ 

002242 


AAAAAA 

OOOOOO 


m 4 

5, 


. /# 


002246 


AAAAAA 

OOOOOO 


m 4 

5, 


75 


002252 


AAAAAA 

OOOOOO 


K 4 

5, 


.76 


002256 


AAAAAA 

OOOOOO 


m 4 

5c 




002262 


AAAAAA 
OOOOOO 


5. 


, /o 


AA^^AA 

OOcc6# 


AAA 

ooo 


m 4 

5c 


. /9 


002265 


AAA 

ooo 


m 4 

5, 


.00 


002266 


AAAAAA 
OOOOOO 


C 4 


01 


AA^^^A 

0022 /O 


AAAAAA 
OOOOOO 


K 4 

5. 


,02 


0022/2 


AAAAAA 
OOOOOO 




,05 


AA^^ 

0022 /4 


AAAAAA 
OOOOOO 


K 4 

5, 


,04 


0022 /6 


AAAAAA 

OOOOOO 


■ 4 

5, 


,05 


AA^ VAA 

002 500 


AAAAAA 

OOOOOO 


C 4 

5c 


.06 


AA9 VA^ 

002 502 


AAAAAA 

OvOOOO 


SI 

9c 


117 


AA9VAA 




5] 


IM 


002306 


OOOOOO 


5; 


L89 


002310 


OOOOOO 


5: 


l«»0 


002312 


OOOOOO 


5: 


.91 


002314 


OOOOOO 


5; 


L92 


002316 


OOOOOO 


51 


193 


002320 


OOOOOO 


5] 


L94 


002322 


OOOOOO 


5) 


195 


002324 


OOOOOO 


5] 


L96 


002326 


OOOOOO 



CTLKVEC: .UORO 



CSR: 
CSRNO: 
SAVCSR. 
OLDCSR: 



0 : HOLDS OLD KERNAL STACK POINTER IN CASE QT CNTL/K 

0 ]DATA TO OR rROn CSR 

iCSR ADDRESS NUMBER (4 LSS'S) 
0 tLOCATION TO SAVE CSRNO DURING fS COnnANO 

0 :OLD CSR NUnBER(USED IN INH PTR TEST) 

THESE LOCATIONS STORE GPRS DURING SUPERVISOR TESTS 



.UORO 
0 

UORO 
.UORO 



SUPDRO: 0 
SUPORl: 0 
SUPDR2: C 
SUPDR3: 0 
SUPDR4: 0 
SUPDR5: 0 
SUP0R6: 0 
DUMMY: 0 

: THESE LOCATIONS STORE GPR'S 6 
0 
0 
0 
0 
0 
0 
0 
0 



DETRO: 
DETRl: 
0ETR2: 
DE rR3: 
DETR4: 
DETR5: 
DETSP- 
DETPSU: 
DETFLAG.O 
CONTFLAG:0 
TOTCSRS: .UORD 



CSRPIRST 
CSRLAST: 
CSR^BANK 
CSRLBANK 
CSRINT : 
SPLTCSR: 
DATBUF 
TSTDAT 
SBEMSK; 
DBEMSK; 
SUPDOAOO: 
PASFLG 
UPPFLG 
PASSNO : 
SAV4 : 
SAVPAR : 
SAVMON: 
MONTLG: 
REALPAT : 
XOCACHE 
PARTHERE 
FSSTACK: 
NEUBANK : 
SOURCE: 
CHECK: 
CBITS: 
MASK : 
CSRIS: 
6ITN0: 
PCBUMP: 



.UORD 

.UORD 

.UORD 

.UORD 

.UORD 

.UORD 

UORD 

UORD 

UORD 

UORD 

.UORO 

BYTE 

B^TE 

UORO 

UORD 

UORD 

UORD 

UORD 

UORO 

.UORD 

.UORD 

UORD 

UORD 

UORD 

UORD 

UORD 

UORD 

UORD 

UORD 

UORD 



0 
0 
0 
0 
0 
0 

0.0 
0,0 
0.0 
0.0 
o 

0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 



;0UMMY LOCATION FOR ADDRESS PASSING 
PSU DURING DETAILED ERROR PRINTOUTS 



DETAILED REPORT FLAG 

CSRS HAVE BEEN TESTED FLAG 

1 BIT PER EXISTING CSR. EG 

CSR 0 REPRESENTED BY BI I 15. ETC. 

FIRST ADDRESS UNDER CONTROL OF THIS CSR 



iTUO UORD DATA BUFFER 
iTUO UORO TEST DATA 

TUO UORO SINGLE BIT ERROR MASK 

TUO UORD DOUBLE BIT ERROR MASK 

ADDRESS OF SUBROUTINE TO EXECUTE IN SUP <VIS0R MODE 
1 LOCAL LOOP PASS CONTROL 
: LOCAL LOOP PASS CONTROL 
(LOCAL LOOP PASS CONTROL 

USED TO SAVE KERNAL PAR 5 iiI.L.C.iREV 
USED TO SAVE KERNAL PAR S 
XXDP MONITOR RETURN ADDRESS 
RETURN TO MONITOR FLAG 
REAL PATTERN UNDER TEST 

BACKED UP VALUE OF CACHE CONTROL REGISTtR 
: PARITY TRAPS SOMETIMES GO TO ADDRESS STORED HERE 
a STACK SAVED HERE IF IN FIELD SERVICE MQOE 
{USED FOR RELOCATION TO A NEU BANK 

(SOURCE OF DATA UORDS FOR CHECKB:T GENERATION SUBROUTINE 

tCHECKBITS TO BE LOADED INTO CSR 

jCHECK bits TO BE URITTEN 

:BIT MASK FOR CSR 

iCSR ALL I'S PATTERN 

I BIT POINTER 

{VALUE TO BUMP THE PC BY TO RECOVER AFTER A PARITY TRAP 



CVMJABO 


nsvii-j 




VARIAatES 


INITIAL 




002550 


000000 


S196 


002552 


000000 


5X99 


002554 


000000 


5200 


002556 


000000 


5201 


002540 


oooooo 


5202 


002542 


oooooo 


5205 


002544 


oooooo 


S204 


002546 


oooooo 


5205 


002550 


OOOOOO 


5206 


002552 


oooooo 


5207 


002554 


oooooo 


5206 






5209 


002556 


ooo 


5210 


002557 


AAA 


5211 


002560 


AAA 
OOO 


5212 






5213 


002562 


AAAAAA 
OOOOOO 


5214 


002564 


AAAAAA 
OOOOOO 


5215 


002566 


AAAAAA 
OOOOOO 


5216 


002570 


AAAAAA 
COOOOO 


5217 


002572 


AAAAAA 
OOOOOO 


5218 


002574 


OOOOOO 


5219 


002576 


AAAAAA 

OOOOOO 


5220 


002400 


OOOOOO 


5221 


002402 


AAAAAA 

OOOOOO 


5222 


002404 


AAAAAA 

OOOOOO 


5223 


002406 


AAAAAA 

OOOOOO 


5224 


002410 


AAAAAA 

OOOOOO 


5225 


002412 


AAAAAA 

OOOOOO 


5226 


002416 


AAAAAA 


5227 


002420 


AAAAAA 

OOOOOO 


5226 


002422 


AAAAAA 

OOOOOO 


5229 


002424 


AAAAAA 

OOOOOO 


5230 


002426 


AAAAAA 

OOOOOO 


5231 


002450 


AAAAAA 

OOOOOO 


5232 


002452 


AAAAAA 

OOOOOO 


5233 


002454 


AAAAAA 

OOOOOO 


5254 


002456 


AAAAAA 

OOOOOO 


5235 


002440 


AAAAAA 

000003 


5256 


002442 


AAAAAA 

OOOOOO 


5237 


002444 


www 


5256 


002446 


oooooo 


5259 


002450 


oooooo 


5240 


002452 


oooooo 


5241 


002454 


oooooo 


5242 


002456 


oooooo 


5245 


002460 


oooooo 



OIAG. 
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SCO 0107 



OOOOOO 



CSRINC: .WORD 0 
CSfttOOP- .WORD 0 
SUCCESS: .WORD 0 
ZEROS : . UORO 0 
TIME: .WORD 0 
SKIPMK: .WORD 0 
NULLFLAG: .WORD 0 
QVFLAG- 0 
ACTFLAG:0 
APTFLAGiO 
XXOPCHAINiO 

iNOTE: THESE TWO BYTES MUST 
♦NULL: .BYTE 0 
♦FILLS: .BYTE 0 
♦TPFLG: .BYTE 0 

.EVEN 
♦ESCAPE :0 
EVEN: 0 
STRIPES :0 



COUNT 
NOTAB 
BSIZE 
KSIZE 
LSIZE 
HSIZE 
PSIZE 



0 
0 
0 
0 
0 
0 
0 



TOOMANY : 0 
READONLY :0 
TEST ADO: 0.0 
UNITOP: 0 
STQPGK: 0 
APTPAR: .UORO 
APTECC: .MORO 
NQFSMOOEiO 
NOERROR : 0 
LOAOBANKtO 
TEMP: 0 
QUICK: 0 
NOSCOPE:0 
FSINFLAG:0 
APTSIZE:0 
FS7FLAG:0 
CONrGERROR:0 
I: 0 
N022BIT:0 
NOSUPERiO 
ERRADO : . WORD 



0 
0 



J VALUE TO INCREMENT ADDRESS BY TO REMAIN IN 'ME SAME CSR 

{LOOP CONTROL FOR CSR TESTING 

:FLAG SET BY SUCCESSFULL TASK OR SUBROUTINE 

jFOR AID IN -MOV INSTRUCTIONS 

i SECONDS THAT BATTERIES SHOULD LAST 

;FLAG TO SKIP MKCONTROL SUBROUTINE 

:SET UHEN RUNNING NULL PATTERNS 

iFLAGS QUICK VERIFY PASS UNDER APT. ACT. OR XXDP CHAIN MODE 
s FLAGS ACT AUTOMATIC MODE PROGRAMMING RULES 
iFLAGS APT AUTOMATIC MODE PROGRAMMING RUES 
(FLAGS XXDP CHAIN MODE PROGRAMMING RULES 
STAY TOGETHER 

: {CONTAINS NULL CHARACTER FOR FILLS 
i (CONTAINS « OF FILL CHARACTERS 
>i "TERMINAL NOT AVAILABLE" FLAG 

> {ESCAPE ON ERROR ADDRESS 

{USED FOR ALTERNATE DATA PATTERNS 

{COUNTS DIAGONAL STRIPES 

{BACKED UP COPY OF STRIPES 

{NO TABLE BEING PRINTED - NOM 

(SIZE OF 11/45 MOS MEMORY IN K WORDS*************** 7 ***** 
{SIZE OF MFllS-K MEMORY IN K UOROS***************** ? ••••• 

{SIZE Of MSVll-L/P MEMORY IN K UOROS 
{SIZE OF MSVll-J MEMORY IN K UOROS 
{SIZE OF Q-BUS PARITY MEMORY IN K UORDS 

{FLAGS UHEN TOO MANY ERRORS HAVE BEEN PRINTED FOR A BANK 

{FLAG TO PATTERNS TO READ ONLY 

{THE ADDRESS TO RUN CSR TESTS ON 

{HIGHEST ACCESSABLE BANK OF MEMORY THRU Q-BUS MAP 

:FLAG TO ALLOU STOPPING UITH SUITCH REGISTER 

{AMOUNT OF PARITY MEMORY ACCORDING TO APT 

{AMOUNT OF ECC MEMORY ACCORDING TO APT 

{FLAG TO DISABLE FIELD SERVICE MODE 

{"THIS IS NOT AN ERROR" FLAG 

{BANK LOADERS ARE RELOCATED TO 

{USED FOR JUNK 

{QUICK STOP FLAG FOR APT POWER FAIL 

I "NO SCOPE LOOP ALLOUED" FLAG 

("FIELD SERVICE NO INTERNAL INTERLEAVE" FLAG 

J APT SIZING INFO FLAG 

{TRUE UHEN IN FIELD SERVICE COMMAND 7 

{CONFIGURATION ERROR FLAG 

(USED FOR GENERAL PURPOSE INDEXING 

{NO 22 -BIT MODE FLAG 

{NO SUPERVISOR MODE FLAG 

(HOLDS THE CSR'S ERROR ADDRESS 
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VARIABLES INITlALIZeO TO ZERO 



SEQ OlOR 



524* 


002462 


OOOOQO 


OOOQQs) 


oooooo 


CSRXNFO 


rO.O.O. 


0.0.0.0.0 


1 iccn Tn cTnDC TucnoMa T Tnki ADm it tuc i& 
{ UbcU 1 U b 1 OHc XNr uKHM 1 lUN ABUU l l nc ID 




002470 


QOQQOO 


oooooo 


oooooo 












002476 




oooooo 


















www 


www 




0.0.0.0.0.0.0.0 






002510 


000000 


oooooo 


oooooo 












002516 


000000 


oooooo 












5246 


00<!522 


000000 






LINKl: 


0 




jUSEO TO HOLD LINKS TO PATTERNS WHICH 


5247 


002524 


000000 






LINK2: 


0 




jCan execute in the par/pdrs or not 


5249 


002S26 


000000 






CSRH0L0:O 




:USEO TO STORE CSR VALUES FOR CSR TESTS 


5249 


0025SO 


000000 






KFLAG: 


0 




lUSEO TO FLAG MFllS K MEMORY TO TESTS»»< 


S2S0 


0025S2 


000000 


oooooo 




PGMCSR : 


.WORD 


0.0 


> POINTS TO PROGRAM CSR 


525 1 


002556 


000000 






INHECC: 


.WORD 


0 


: FLAGS INHIBIT ECC TESTS ON RELOCATION 


5252 


002540 


000000 






ANK 


: .WORD 


0 


• 


525S 


002542 


000000 






FULLREL 


: . UORO 


0 




5254 


002544 








ICnTGE: 


i*ENO 


or connoN tags 





CvnjABO nsvii 

VARIABLES 



-J nEMORY 01 AG. riACRO Y0S.02 
INITIALIZED TO NGN ZERO 



Monday 07-0ct-85 16:57 Pag« 119 



SEQ 0 



5.^57 
5258 
5259 
5260 
5261 
5262 
5263 
5264 
5265 
5266 
5267 
5266 
5269 
5270 
5271 
5272 
5275 
5274 
5275 
S276 
5277 
5276 
5279 
5260 
5281 
5282 
5283 
5284 
5285 
5286 
5287 
5288 
5289 
5290 
5291 
5292 
5293 
5294 
5295 
5296 
5297 

5298 
5299 
5300 
5301 



002544 
002550 
002552 
002554 
002556 
002560 
002562 
002564 
002566 
002570 
002572 
002574 
002576 
002600 
002602 
002604 
002606 
002610 
002612 
002614 
002616 
002620 
002622 
002624 
002626 
002630 



002632 
002634 



002636 
002640 
002642 
002644 
002646 
002650 
002652 
002653 
002656 
002657 
002660 
002661 



000401 
001014 
040000 
000012 
000177 
177000 
160000 
000000 
000000 
000000 
000031 
002000 
000001 
177777 
176543 
123456 
176543 
123456 
177777 
177777 
000003 
052525 
000000 
000000 
000000 
000000 



000377 
177400 



177570 
177570 
177560 
177562 
177564 
177566 
012 
207 
000 
077 
015 
012 



000000 



377 



000 



377 



.SBTTL VARIABLES 
CACHKN: 401.0 
CACHKF: 1014 
TESinOOE: 40000 
ERRtlAX: 10. 
LASTBANK:177 
LASTBLOCK: 177000 
ENOAOO: 160000 
ENOFLG: 0 
SURFLG: 0 
PASCNT: 0 
S06K : 25 . 
KSTACK: STACK 
LOAOHOflE : 1 
UORST: 177777 
SEEOHI: 176543 
SEEOLO: 123456 
MSEEOH: 176543 
nSEEOL: 123456 
HEADER: 177777 
ONES: 177777 
FLIPL0C:3 
SOFTPAT: 52525 
ILPADR: .WORD 0 
ILPERR: .WORD 0 
RESTART :0 
lERTTL: .WORD 0 



INITIALIZED TO NON ZERO 
CACHE CONSTANT (nOVED TO CONTRL TO TURN ON CACHE) 
CACHE CONSTANT (MOVED TO CONTRL TO TURN OFF CACHE) 
USED TO SELECT THE PROPER TEST H0DE FOR A PATTERN RUN 
MAX « OF ERRORS PER BANK WITH SUll 
HIGHEST BANK OF MEMORY 

HIGHEST BANK OF MEMORY »1 (IN PAR FORMAT) 
ENDING ADDRESS 
END FLAG 

USED TO BUMP STACK ON FIRST CALL TO GTSWR 
PASS COUNTER 
SOB CONSTANT 
STACK BEGINNING 
HOME BANK OF LOADERS 

SET IF TESTING BANKS IN WORST FIRST MODEdST PASS) 
UORKING SEED HI (USED FOR RANDOM NUMBER GENERATOR) 
WORKING SEED LO (USED FOR RANDOM NUMBER GENERATOR) 
MASTER SEED HI (USED FOR RANDOM NUMBER GENERATOR) 
MASTER SEED LO (USED FOR RANDOM NUMBER GENERATOR) 
USED PRINT HEADINGS ONLY ONCE 
FOR A IN "MOV" INSTRUCTIONS 

COUNTER FOR FLIPING DATA ON WORST CASE NOISE TEST 

PATTERN FOR SOFT ERROR BACKGROUND TESTS 

: CONTAINS SCOPE LOOP ADDRESS 

: CONTAINS SCOPE RETURN FOR ERRORS 

RESTART (START ADD 202) FLAG 

; CONTAINS TOTAL ERRORS 



BAKPAT ; 
SWAPAT ; 



.WORD 
.WORD 



377 

177400 



NOTE 



THESE TWO LOCATIONS MUST 
i BACKGROUND PATTERN 
; SWAPPED BAKPAT 



STAY TOGETHER 



SWR ' 

DISPLAY: 
*TKS; 

♦ TKB; 

♦ TPS; 
»TPB; 
IFILLC; 
tBELL: 



. WORD DSWR 



WORD 
177560 
177562 
177564 
177566 
.BYTE 
.ASCIZ 



DDISP 



12 



<207><377><377> 



IQUES: .ASCII /?/ 

*CRLF: .ASCII <15> 

tLF: .ASCIZ <12> 
.EVEN 



i (ADDRESS OF SWITCH REGISTER 
; (ADDRESS OF DISPLAY REGISTER 
ijTTY KBD STATUS 
jjTTY KBD BUFFER 

(jTTY PRINTER STATUS REG. ADDRESS 
SiTTY PRINTER BUFFER REG. ADDRESS 
: (INSERT FILL CHARS. AFTER A "LINE FEED' 
({CODE FOR BELL 

( (QUESTION MARK 
{(CARRIAGE RETURN 
( (LINE FEED 



cvrijABO nsvii-j ncnoRY oiag. 

CONFIGURATION TABLE 

5304 
5305 
5306 
5307 
530a 
5509 
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.S8TTL CONFIGURATION TABLE 
CONFIG:FIRST 16K CONFIGURATION WORDS (2 EACH) 

2N0 16K CONFIGURATION WORDS (2 FACH) 



SEQ 0110 



ss 
ss 

S3 
53 
SS 
S3 
SS 
53 
S3 
53 
5320 
5321 
5322 
5323 
5324 
5325 

5326 002664 
S329 003670 



000201 



200TH 16K CONFIGURATION WORDS (2 EACH) 



CONFIGURATION UURDS: 
LOU: 



HIGH: 



CONFIG: .REPT 201 
CONFIENO: 



BIT 0 ERRORS PRESENT 

BIT 1 MEMORY SUCESSFULLY ACCESSED 

BIT 2-4 RESERVED 

BIT 5 SKIP ECC LOGIC TESTS FLAG (1-SKIP) 

BIT 6 PROTECTED REGION OF ECC MEMORY 

BIT 7 PROTECTED (PROGRAM SPACE) 

BIT 8-11 CSR CODE 

BIT 12-15 RESERVED 

BIT 0-7 NUMBER OF ERRORS 

BIT 8-10 MEMORY TYPE 

BIT 11 RESERVED 

BIT 12 RESERVED 

BIT 13 "BACKGROUND PATTERN VALID" FLAG 

BIT 14 BANK SELECTED FOR TEST BY FIELD SERVICE MODE 

BIT 15 LOADERS HOME BANK 



cvnjABO nsvii-J nEfiOftY oiag. 

•••••••••••••••••••••A MAIN 

5351 

5332 003670 



5SSS 

5334 003670 
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START 



SCQ 0111 



.SBTTL *«*******••*••**•*••** MAIN a***' 

SUBTST <<INITIALIZE VARIABLES TO ZERO» 



{•SUBTEST 



INITIALIZE VARIABLES TO ZERO 



SUBTST <<SAVEMT>> 



i*SUBTEST 



SAVEMT 



5335 
5336 
5337 
5547 

5340 003670 



i SAVEMT SAVES THE EMULATOR ANO PRIORITY LOCATION 
i UNDER THE NAMES OF SAV30 ANO SAV32. 



SAVEMT 

I i LCP/ORION ROUTINE TO SAVE EMTULATOR ANO PRIORITY 





003670 


005737 


003756 




EMTSAV : 


TST 




003674 


001034 








BNE 




003676 


C32737 


000040 


000052 




BIT 




003704 


001430 








BEQ 




003706 


012737 


177777 


003762 




MOV 




003714 


032737 


000100 


000052 




BIT 




003722 


001403 








BEQ 




003724 


012737 


177777 


003764 




MOV 




003732 


104042 






11: 


EMT 




003734 


005060 


000042 






CLR 




003740 


013737 


000030 


003756 




MOV 




003746 


013737 


000032 


003760 




MOV 




003754 


000404 








BR 




003756 


000000 






SAV30: 


.UORO 




003760 


000000 






SAV32: 


.WORD 




003762 


000000 






UFOFLG: 


.WORD 




003764 


000000 






UQUIET ! 


.WORD 




003766 








VMKOR : 




5349 


003766 


105737 


056736 






TSTB 


5350 


003772 


001001 








BNE 


5351 


003774 


000005 








RESET 


5352 


003776 
003776 


005037 


002276 




NORES: 


CLEAR 


5353 


004002 


010637 


002274 






MOV 


5354 


004006 


013706 


002574 






MOV 


5355 


004012 


012700 


002000 






MOV 


5356 


004016 


005020 






11: 


CLR 


5357 


004020 


022700 


002544 






CMP 


5358 


004024 


001374 








BNE 


5359 


004026 


012737 


000177 


002556 




MOV 


5360 


004034 










SUBTST 



SAV30 
VMKOR 

«6IT5.B«52 
VMKOR 

♦-1.UF0FLG 
«6IT6.a«52 
1$ 

«-l. UQUIET 
42 

42(R0) 
30.SAV30 
32,SAV32 
VMKOR 
0 
0 
0 
0 

«ENV 
NORES 

MONFLG 

SP.SAVMON 
KSTACK.SP 
«ICMTAG.RO 
(RO). 

«ICMTGE.RO 
1» 

#177.LASTBANK 



<< CLEAR NON -PROGRAM SPACE >> 



:s FIRST TIME THROUGH 7 

s t BRANCH IF BEEN HERE ALREADY 

1 1 ARE UE IN UFO MODE ? 

s 5 LEAVE IF NOT 

J ; SET UFO FLAG 

ARE UE IN QUIET MODE 7 
BR IF NOT 
SET QUIET MODE 

GET ADDRESS OF XXDP OCA TABLE 
ii CLR XXDP* "DRSERR" 
ti SAVE EMULATOR ADDRESS 

SAVE EMULATOR PRIORITY LEVEL 
GET AROUND TAG AREA 
PUT EMULATOR INFO HERE 
PUT PRIORITY LOCATION HERE 
USER FRIENDLY MODE FLAG 
UFO QUIET MODE FLAG 



s J CLEAR RETURN TO MONITOR FLAG 

CLR MONFLG 
I i SAVE XXDP MONITOR RESTART ADDRESS 
u SETUP THE STACK POINTER 
::FIRST LOCATION TO BE CLEARED 
I (CLEAR MEMORY LOCATION 
I (DONE? 

{LOOP BACK IF NO 

(RESTORE LASTBANK CTHIS MUST BE DONE PRIuR TO SYSTEM SIZING) 
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CLEAR NON -PROGRAM SPACE 



SCO 0112 



t*SUBTEST CLEAR NGN PROGRAn SPACE 



5561 »THIS ATTEMPS TO GET RID OF ANY PARITY ERRORS BY URITING INTO 

55*2 jEVERY LOCATION THAT IS NOT LOADED INTO BY THE PROGRAM OR ALLOCATED 

5565 iTO THE XXDP LOADERS 

5564 004034 012757 000001 002076 MOV «1,N0PAR i PARITY ACTION - COUNT £ IGNORE 

5565 004042 005000 CLR RO 

5566 004044 000241 2$: CLC 

5567 004046 005520 ADC CRO)* 
5566 004050 020027 160000 CMP R0,«160000 
5569 004054 105775 BLO 2* 

5370 004056 005057 002076 CLR NOPAR ; RESTORE DEFAULT PARITY ACTION 

5571 



CvnjASO nsvii-j rcnoRY oiag. 
CLEAR NON- PROGRAM SPACE 

5S7S 004062 
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SEQ 0113 



SUBTST <<TYPE OF SYSTEM SIZER>> 



{•SUBTEST 



TYPE OF SYSTEM SIZER 



5374 004062 

5375 004064 

5376 004066 
004066 

5377 004074 
5379 004102 
5379 

5360 
5301 
5382 



000401 
000000 

012737 004162 000004 



012737 004106 
000007 



000010 



BR SYSSIZ 

PROTYP: .UORO 0 

SYSSIZ: SET4 «3I 

MOV «SI.4 

.OSABL CRF 

MOV #11.10 
MFPT 



(SKIP OVER VARIABLE LOCATION 



(TRAPS TO 10 - BAD PROCESSOR TYPE 
J TYPE OF PROCESSOR TEST: THIS INSTRUCTION 
((AVAILABLE ON NEWER PROCESSORS ONLY) PLACES 
I A CODE IN THE LOWER BYTE OF RO THAT 
(INDICATES THE PROCESSOR TYPE. 1-11/44 
(3-11/23. 5-ll/»3/e4 (Orion) 





r\/sA 1 f\A 


WV^XO 








QD 
OK 


c « 






f<i/\A 1 /\JL 


A1 01X7 
UXc r 0 ' 






1* : 


nuv 


AATVDC XA 


.1 AAA TDAD UCTTnO 
} LUMU 1 KMK VcL 1 UN 


9903 


fif\A \ ^A 
1 










TYDP 




.TCI 1 TMFH RAA DDArPCCAD TYPP 






Xw^^U X 


ATI 






TYDCTT 


Mcni xt\ 


3000 


UU^XcU 


A1 AAAtft 








riUw 


DA .^CP^ 


t *K QAUP DA 




Wv^ Xcc 


V/V jV/W 










DA 




3000 


SJ%J^ Xc^ 


AAA717 


n^933n 






ICO 
Jon 


Pr ADADT 


{(K SEE IF THIS IS A UFO ABORT SITUATION 


DOOY 




A1 3 AAA 








Mnw 


f QP ^ « DA 


• vie TP MAT DPCTADP DA AMA l-IAI T 

• MA MPPn TA f^A AM 




W^X^C 


AAAAAA 








MAI T 




90VX 


AAA1 XA 


A1 37X7 
VXs ' 9 r 




AAAA1 A 


cv : 




At 9 1 A 
VXC t XU 


•DPCTADP TDAPC TA 1A 


^Y09 


f^£iA\AO 
W^X^s 


1 1 AAX7 
XX W J r 








1 l\J wo 


DA PDATYP 


(MOV THE CODE TO PROTYP 




fh^%A%AA 
W^X^D 










OC 1 ^ 


AXk 


I 




AAA 1 AA 
X^D 


A1 97Y7 
UXs r d r 




AAAAAA 




Mnu 


AX ft A 




90 


AAA 1 %A 


AA^7'V7 


X • • • ~w 






TST 




• CPP TP TArHF BPftTCTPB DPCPDMnC 
{ OCC Xr K^ny^riC nCwXOICn nCOrUni/O 


5395 


004160 


000447 








BR 


61 


(BRANCH IF CACHE AVAILABLE 


5396 


004162 


005037 


002544 




31 : 


CLR 


CACHKN 


:N0 CACHE ON SYSTEM 


5397 


004166 


012737 


002336 


060412 




MOV 


♦ZEROS. OT 11 


(DO NOT PRINT CONTRL ERROR MESSAGES 


5396 


004174 


022737 


000005 


004064 




CMP 


♦5. PROTYP 


(IS THIS A 11/83/84 


5399 


004202 


001436 








BEQ 


6* 


(YES - BRANCH 


5400 


004204 










SET4 


•4t 


: 




004204 


012737 


004234 


000004 




MOV 
.OSABL 


«4t,4 

CRF 




5401 


004212 


005037 


172516 






CLR 


MMRS 


(SEE IF THERE IS 22 -BIT ADDRESSING 


5402 


004216 


052737 


000020 


172516 




BIS 


«6IT4.MMR3 


1 


5403 


004224 


032737 


000020 


172516 




BIT 


«6IT4.MnRS 




5404 


004232 


001005 








BNE 


51 


IbRANCH IF 22-BIT RELOCATION 


5405 


004234 


005237 


002454 




41: 


INC 


N022BIT 


(SET FOR NO 22 BIT ADDRESSING 


5406 


004240 


012737 


000007 


002556 




MOV 


«7.LASTBANK 


(HIGHEST BANK OF MEMORY 


5407 


004246 


012737 


140000 


002552 


5<: 


MOV 


«140000.TESTMOOE 


(MAKE TESTMODE USER 


5406 


004254 


005237 


002456 






INC 


NOSUPER 


1 CLEAR SOME ERROR DATA TAGS 


5409 


004260 


005037 


060262 






CLR 


0T5»10 


5410 


004264 


005037 


Ot>0422 






CLR 


0T14*10 


i 


5411 


004270 


005037 


060264 






CLR 


0T5»12 


{ 


5412 


004274 


005037 


060424 






CLR 


0T14*12 


iCPU TYPE - 11/83/84 


5413 


004300 


022737 


000005 


004064 


6t: 


CMP 


•5. PROTYP 


5414 


004306 


001003 








BNE 


22 ( 


(NO - BRANCH 


5415 


004310 


052737 


000020 


172516 




BIS 


«BIT4.MMR3 


(SET UP 22 BIT ADDRESSING 


5416 


004316 








22(: 


SET4 


•7< 


(TRAPS GO TO 4< 




004316 


012737 


004342 


000004 




MOV 
.OSABL 


•71.4 

CRF 





cvnjAeo hsvii J MEnoRY oiag. 

TYPP Of SrSTEH SXZER 



004364 
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5417 004324 005037 052364 

5418 004330 OOS737 177766 

5419 004334 012737 177777 052364 

5420 004342 

004342 012737 034002 000004 

004550 022737 000005 004064 

004356 001002 

004360 005037 177766 



7$. 



1011: 



CLR 
TST 
MOV 
RES4 

nov 

CMP 
BNE 

CLR 



CPERRF 

8*177766 

•-1.CPERRF 

♦TIMEOUT. 4 
♦S.PRGTYP 
101 f 
CPUERR 



5421 



.OSABL CRF 



SEQ 0114 



I CLEAR THE FLAG 

tIS THERE A CPU ERROR REGISTER? 
, YES -TRAPPED 
lErMBLE TRAPS TO 4 

lis THIS AN 11/63/54 7 
• BRANCH IF NOT 

i CLEAR OUT THE CPU ERROR REGISTER BITS 



THAT A EXPECTED TRAP COULD HAVE SET 



CVMJA80 HSVll-J MEMORY OI*G. 
TYPE OF SYSTEM SIZER 

5424 004564 
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SEQ 0115 



SUBTST <<ZNZTZALZZE VARZA8LES TO NGN ZERO>> 
i*SUBTEST ZNZTZALZZE VARZABLES TO NGN ZERO 



I' 



5425 

5426 
5427 

5426 
5429 
5450 
5431 
5432 
5433 
5434 



004364 
004564 
004372 
004400 
004400 
004406 
004414 
004422 
004430 
004436 
004444 
004452 



012737 
012737 

012737 
012737 
012737 
013737 
013737 
012737 
012737 



177777 
000003 

177777 
176543 
123456 
002606 
002610 
000377 
177400 



002600 
002616 

002612 
002606 
002610 
002602 
^2604 
002632 
002634 



SET UORST 

MOV •3.FLZPL0C 

SET HEADER 

MOV *176543.MSEEDH 

MOV «12S4S6.MSEEDL 

MOV MSEEOH.SEEOHZ 

MOV MSEEOL.SEEOLO 

MOV «377,BAKPAT 

MOV «177400,SUAPAT 

SUBTST <<ZNZTZALZZE VECTCRS>> 



MOV *-l, WORST 
MOV «-l. HEADER 



iPRZME THE RANDOM NUMBER GENERATOR 
(BOTH HZGH AND LOU UORDS 



{•SUBTEST 



ZNZTIALZZE VECTORS 



5435 


004452 


C12737 


051054 


000020 


MOV 


5436 


004460 


012737 


000340 


000022 


MOV 


5437 


004466 


012737 


051410 


000030 


MOV 


5436 


004474 


012737 


000340 


000032 


MOV 


5439 


004502 


012737 


057034 


000034 


MOV 


5440 


004510 


012737 


000340 


000036 


MOV 


5441 


004516 


012737 


045260 


000024 


MOV 


5442 


004524 


012737 


000340 


000026 


MOV 


5443 


0045&2 


012737 


033632 


000114 


MOV 


5444 


004540 


012737 


000340 


000116 


MOV 


5445 


004546 


012737 


034026 


000010 


MOV 


5446 


004554 


012737 


000340 


000012 


MOV 


5447 


004562 


012737 


034002 


000004 


MOV 


5446 


004570 


012737 


000340 


000006 


MOV 


5449 


004576 


012737 


034014 


000250 


MOV 


5450 


004604 


012737 


000340 


000252 


MOV 


5451 


004612 


104423 






CACHON 



*«SCOPE,ZOTVEC 

•340,Z0TVEC*2 

•«ERROR.EMTVEC 

•340.EMTVEC*2 

#«TRAP.TRAPVEC 

•340.TRAPVEC*2 

•IPURDN.PURVEC 

•S40.PURVEC*2 

#PARZTY.PARVEC 

•340.PARVEC*2 

«POP110S.RESVEC 

#340.RESVEC*2 

•TZMEOUT.ERRVEC 

•340.ERRVEC*2 

«nMTRAP,MMVEC 

*340.MMVEC«2 



tsZOT VECTOR FOR SCOPE ROUTINE 
It LEVEL 7 

jjEMT VECTOR FOR ERROR ROUTINE 
u LEVEL 7 

J t TRAP VECTOR FOR TRAP CALLS 
I LEVEL 7 

; {POWER FAILURE VECTOR 
1 1 LEVEL 7 

(GET READY FOR PARITY ERRORS 

(RESERVED INSTRUCTION TRAP 

J SETUP TIMEOUT ERRORS 

I SET PRZORZTY OF ERROR TRAPS 

{VECTOR FOR MEMORY MANAGEMENT 

{TURN CACHE ON 



cvnjASo nsvil-J rcMORY oiag 
INITIALIZE VECTORS 



5454 


004614 






5455 








5456 








5457 








54 5« 








5459 


004614 


012700 


AC 9AAA 

057004 


5460 


004620 


A t '^AA 4 

012001 




5461 


004622 


012703 


016702 


5462 


004626 


012702 


000020 


5463 


0O46S2 


OW4 13 1 


AAA 

004792 


54*4 


0O4636 


012001 




5463 


004640 


012 '02 


AAAA< A 
OOOOIO 


•AAA 

5466 


004644 


0047S f 


AAA ? V9 

004 f 3c 


54*7 


004650 


A 4 *%/\A 4 

012v01 




5466 


004652 


012703 


A« ^4 

017132 


5469 


AAA A 


012 702 


AAAA^A 

000020 


M fQ 


0046OC 


AAA? VT 


AAA 

004 f 3c 




004666 


At OAA1 






0046 rO 


012 'V2 


/W\A1 A 

OOOOIO 




0046 f 4 


U04 »S » 


004 r3c 




004 f OO 


At 






OA470P 


VAC • V J 




5476 


004706 


012702 


000020 


5477 


004712 


004737 


004732 


5478 


004716 


012001 




5479 


004720 


012702 


OOOOIO 


5480 


004724 


004737 


004732 


5481 


004730 


000417 




5482 








5483 


004732 
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SUBTST <<INITIW.IZE PATTE«NS>> 



SCO 0116 



i*SUeTEST 



INITIALIZE PATTERNS 



iTHE APT E-TA8LE OETERtllNES UHICM PATTERNS ARE GOING TO BE RUN. 
(EACH BIT SET REPRESENTS A PATTERN TABLE ENTRY THAT IS TO BE LEFT 
I ALONE (TO BE RUN). EACH BIT CLEARED REPRESENTS A PATTERN TABLE ENTRY 
I THAT IS ro BE OVERLAYED UITH THE ADDRESS OF A NULL PATTERN. 



MOV 
HOV 
MOV 
MOV 
CALL 
MOV 
MOV 
CALL 
MOV 
MOV 
MOV 
CALL 
MOV 
MOV 
CALL 
MOV 
MOV 
MOV 
CALL 
MOV 
MOV 
CALL 
BR 



•IDOM.RO 
CR0)*,R1 
8NKCSRT.RS 
#16.. R2 
PATPLUG 
(R0)*.R1 
♦8. ,R2 
PATPLUG 
(R0)*.R1 
«MKPAT,R3 
•16. .R2 
PATPLUG 
(R0)*.R1 
•B..R2 
PATPLUG 
CR0)*.R1 
•MJPAT.R3 
•16. .R2 
PATPLUG 
(R0)*.R1 
•8. .R2 
PATPLUG 
SUBAAA 



5484 


004732 








004732 


012737 


000001 




004740 






S4BS 


004740 


006001 




5486 


004742 
004742 


10S402 




5487 


004744 


01271S 


024106 


5488 


0047S0 
004750 






5489 


004750 


062703 


000002 


5490 


004754 








004754 


005237 


002452 




004760 


023702 


002452 




004764 


003765 






004766 






5491 


004766 


000207 





002452 



PATPLUG :SUBTST <<SUBR PLUG IN NULL PATTERNS >> 
'(•SUBTEST SUBR PLUG IN NULL PATTERNS 

** FOR I % ♦! TO R2 * **' 



ROR Rl 
ON.NOERROR 

MOV •«T0999.(R3) 
END (OF ON. ERROR 

ADD •2.R3 

END lOF FOR 



RETURN 



ilF CARRY CLEAR 



MOV •!.! 

BO: : i : i 1 1 



BCS LO 
LO: 1 1 1 1 1 1 



INC I 
DIP I.R2 
BLE BO 

EO: 1 1 1 1 1 1 1 



cvnjAao HSVll 
SUM 



J McnoRY qim. 

PLUC IN NULL PATTERNS 



S494 004770 



S49S 
S4W 
54f7 
94M 



54W 

5900 
S901 

SS04 
SS05 
990* 



9907 
990« 
990« 



004770 
004770 
004774 
00477* 
009002 
009004 
009010 
009012 
009012 

009012 
009020 



9910 


009020 








009020 


0127S7 


009094 


9311 


009026 


012737 


177970 


9912 


0090S4 


0127S7 


177970 


991S 


009042 








009042 


022777 


177777 




009090 


00102S 




9914 


009092 


00040S 




5919 


009094 


01271* 


0090*2 


55U 


0090*0 


000002 




9917 


0090*2 








0090*2 


012737 


034002 




009070 


022737 


000005 




00907i 


001002 






009100 


009037 


17776* 




009104 







5518 005104 

5519 005112 
5920 005120 

005120 

5521 



012737 
012737 



00017* 
000174 
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SUe/»AA: SUBTST <<CLEAR THE CONFIGURATION TABLE>> 



SEQ 0117 



009737 002*2* 
00100* 

012700 002*«4 
009020 

022700 003*70 
001374 



012737 000002 00210* 



000004 

002*3* 
002*40 

1799** 



000004 
0040*4 



002*56 
002640 



{•SUBTEST 



CLEAR THE CONFIGURATION TABLE 



(THIS ZEROS (UNLESS UE STARTED AT ADDRESS 202) THE COiriG TABLE 
iUHICH IS FULLY DISCRIBED AT LOCATION -CONTIG". 
.ENABLE LS8 

If «ST«, IS r«LSE ^j^^, 

BNi LI 

NOV KONFIG.RO 
CLR (RO)* 
CNP KONFIEND.RO 
BNE II 
END I OF IF RESTART 

Lit I • 1 1 1 1 

DSABL LSB 

NOV 4BIT1.CPUBIT iSET ID BIT 

SUBTST <<SIZE FOR A HARDWARE SUITCH RE6ISTER>> 



II: 



(•SUBTEST 



SIZE FOR A HARDWARE SUITCH REGISTER 



I' 



iilF NOT FOUND OR IT IS 

iiEQUAL TO A "-l". SETUP FOR A SOFTWARE SUITCH REGISTER. 
.ENABL LSB 



SI: 
21: 

1011: 



SET4 #3 I 
NOV •31.4 
.DSABL CRF 
NOV MSUR.SUR 
NOV 4DDISP. DISPLAY 
IF 9-1 EQ 8SUR 



BR 21 

NOV MI.CSP) 

RTI 

RES4 

NOV #TINE0UT,4 

CNP ♦5.PR0TYP 

BNE 1011 

CLR CPUCRR 



.DSABL CRF 

NOV •SUREG.SUR 

NOV 40ISPREG. DISPLAY 
END lOF IF t-l 

.DSABL LSB 



i TRAPS TO 4 GOTO 31 



1 1 SETUP FOR A HARDUARE SUITCH REGISTER 

1 1 AND A HARDUARE DISPLAY REGISTER 

(IF NO TRAP FRON REFERENCE TO BSUR AND 8SUR • 

CNP ••1.8SUR 
BNE L2 

t I BRANCH IF NO TINEOUT 
1 1 SET UP FOR TRAP RETURN 

I RESET TRAPS TO 4 TO DEFAULT 

lis THIS AN 11/83/64 7 
t BRANCH IF NOT 

I CLEAR OUT THE CPU ERROR REGISTER BITS 
jTHAT A EXPECTED TRAP COULD HAVE SET 
I (POINT TO SOFTWARE SUR 

L2: I i t t i I 



♦ 1 



CVMJA80 nSVll J rtEMOWY 01 AC. MACRO Y05.02 
Size fOn A HAROUARC SWITCH REGISTER 
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55?4 


005120 








5525 










5526 










5527 


005120 


005037 


056724 




5526 


005124 










005124 


132737 


000040 


056737 




005132 


001403 






5529 


005134 










005134 


012737 


177777 


002360 


5550 


005142 










005142 








5531 


005142 










005142 


132737 


000200 


056737 




005150 


001403 






5552 


005152 










005152 


012737 


177777 


002444 


5513 


005160 










005160 








5554 


005160 










005160 


123727 


056736 


A AAA A ■ 

000001 




005166 


001023 






5535 


005170 










005170 


012737 


177777 


002352 




005176 


012737 


17777 7 


002346 




005204 


012737 


mm 


002062 




005212 


012737 


• ^^^^^ 

171111 


002436 


5536 


005220 


012737 


040626 


000024 


5537 


005226 


012737 


056740 


002636 


5536 


005234 










005234 


AAA A V A 

000430 








005236 








5539 


005236 










005236 


023727 


A AAA M 

000042 


A A ^ A A A 

002000 




005244 


001424 








005246 


005737 


000042 






005252 


001421 






5540 


005254 










005254 


012737 


1 (1111 


002946 




005262 


012737 


177777 


002062 


5541 


005270 










005270 


023727 


000042 


013730 




005276 


AA* AAA 

001004 






5542 


005300 










005300 


012737 


177777 


AA*% V K A 

002350 


5345 












005306 


000403 








005310 








5544 


005310 










OOSSIO 


012737 


177777 


002354 


5545 


005316 










005316 








5M6 


005316 










005316 








5547 


005316 









SCO oils 



SUBAAB: SUBTST 



i*SUBTEST 



<< SETUP ACT. APT. e XXOP>> 
SETUP ACT. APT. £ XXOP 



(THIS SETS UP A BUNCH OF FLAGS TO TtLL THE PROGRAn EVERYTHING 
ilT CARES TO KNOW ABOUT APT. ACT. L XXOP, 



CLR IPASS 
IFB •BIT5 SET. IN lENVN 



iCLE^R PASS COUNT 



i INDICATE NO TERMINAL 



SET ITPFLG 
END iOF IFB «BIT5 
IFB •BIT7 SET. IN «ENVn 

SET APTSIZE 
END I OF IFB •BIT7 
IFB lENV EQ •I 

SET APTFl AG. QVFL AG. (AUTO. QUICK 



BITB •eiTS.ICNVH 

BEQ L3 



NOV 

L3: 1 > ( 1 1 1 



•-I.ITPFLG 



BITB •6IT7.tENVN 
BEQ L4 

nOV t-l. APTSIZE 



L4: 



: i > i 



CNPB lENV.^l 
BNE L5 



MOV 
MOV 
ELSE 



MPTOOUN.PURVEC 

»»SUREG,SUR jUSE APT SUR 



MOV 
MOV 
MOV 
MOV 



•-1.APTFLAG 
•l.QVFLAG 

• I.IAUTO 

• 1. QUICK 



IF 42 NE tSTACK AND 42 NE *0 

SET QVFLAG.CAUTO 

IF 42 EQ ttENOAD 

SET ACTFLAG 
ELSE 



L5: 



BR L6 

i i 

CMP 42.«STACK 
BEQ L7 
TST 42 

BEQ L7 



MOV 
MOV 



•-l.QVFLAG 
• I.IAUTO 



CMP 42.«IEN0A0 

BNE LIO 

MOV #-1. ACTFLAG 



SET 



XXOPCHAIN 



BR Lll 
LIO: 1 1 1 1 1 1 



END ;0F IF 42 
END lOF IF 42 
END I OF IFB »ENV 



MOV 
Lll: 1 1 1 1 1 ( 
L7: 1 1 1 1 1 i 



•-1. XXOPCHAIN 



CvnjAao nsvil J utEHOm OIAg. 

SrTuP ACT. APT. e XXOP 





005S16 






5549 


009910 






5550 


OOSSlD 








V09 Sc4 








OV9ASC 








U0999c 




A« V7 




Vw93*V 








UV99#2 








005542 


005757 


002454 




00SS4« 


001405 




999* 


OV9S9W 








WU399W 


Ulc ' J ' 


1 77777 

X ' ' ' ' ' 


9933 


VU9A30 






9330 


UU330U 








005560 


0OO402 






005562 






5557 


005562 








005962 


104401 


071472 


5550 


005566 








005566 






5559 


005566 








00S566 






S560 
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suet ST << PROTECT PROGRATI C LOADERS >> 



SCO 0119 



1.6: 1 1 1 1 i I 



002664 

002670 

000042 



002276 



•SUBTEST 



PROTECT PROGRAM 6 LOADERS 



BIS •eiT7. CONFIG 

BIS «eiT7.C0NFIG*4 
IF •tENDAO NE 42 



IF N022BIT NE 90 

SET MONFLG 



ERROR *64 
ELSE 



TYPE nSGOOO 
TYPEIT .fISGOOO 
.DSML CRF 
END 

END I OF IF tIENOAO 



{PROTECT PROGRAM SPACE (BANC 0) 
; PROTECT LOADER SPACE (BANK 1) 
iNOT ACT-117 

CtIP ••ENPA0.42 
BEQ L12 



;RETU«N TO XXDP MONITOR 
: ILLEGAL PROCESSOR 



TST N022BZ 
BEQ L15 

NOV •-i.noirLG 



BR L14 

L 1 3 : : : i ; ] : 
sTTPE PROGRAM TITLE 



L14: 1 1 1 1 i t 
L12: : : I s I : 



CvnjMO nSVll J MEMORY OIAG. 
SETUP ACT. APT. £ XXOP 
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SEa 0120 



S5«l 00&5M 



5562 
5563 



SUBTST <<CHECK FOR CACHE AND MEMORY MANAGEMENT >> 



{•SUBTEST 



CHECK FOR CACHE AND MEMORY MANAGEMENT 



«• THIS FIGURES OUT IF THERE IS 
i* ON THE SYSTEM. AND WHETHER IT 



A CACHE AND MEMORY MANAGEMENT 
IS ENABLED OR DISABLED. 



5564 


005 366 










SET4 


•31 








005 366 


012737 


005566 


000004 




MOV 


•31.4 


















DSABL 


CRF 






5565 


005374 


005737 


177746 






tST 


CONTRl ilS 


THERE A CONTROL REGISTER? 


5566 


005400 










SET4 


•1) 








005400 


012737 


005500 


000004 




MOV 


•1*.4 


















. DSABL 


CRF 






556 / 


005406 


005737 


172516 






TST 


MMR3 


IS 


THERE A MMR3 REGISTER? 


5566 


005412 


013746 


000004 






MOV 


4.-(SP) 




V 


SAVE OLD TIME OUT 


5569 


005416 


012737 


005466 


000004 




MOV 


•141,4 




V 


PASS ON KTJII 


5570 


005424 


032737 


001000 


177750 




BIT 


•BIT9.e#177750 




V 


TEST FOR 1154 


5571 


005432 


001415 








BEQ 


14* 




V 


ELSE REPORT 1163 


5572 


005434 










TYPE 


M1184 




V 


REPORT 1164 




005434 


104401 


071150 






TYPEIT 


.M11S4 


















.DSABL 


CRF 






5573 


005440 


052737 


000400 


177730 


12*: 


BIS 


•BITe.8^177730 




V 


SET ABILITY TO CLEAR 


5574 


005446 


042737 


000077 


177734 




BIC 


♦77.8^177734 




V 


UNIBUS MEMORY ACCESS 


5575 


005454 










TYPE 


NOUBMT 




,v 


TO UNIBUS 




005454 


104401 


071620 






TYPEIT 


.N0U6MT 


















.DSABL 


CRF 






5576 


005460 


012637 


000004 






MOV 


(SP)».4 




V 


AND REPORT NO UNIBUS 


5577 


005464 


000411 








BR 


4* 




V 


MEMORY ACCESS AND CONTINUE 


5578 


005466 


012637 


000004 




14»: 


MOV 


(SP)».4 




v 


ALSO RESTORE OLD TIME OUT 


5579 


005472 










TYPE 


MSG117 


11/63 




005472 


104401 


071162 






TYPEIT 


.MSG117 







cvnjAeo nsvn j nEnoRT diac. riACRO yo£.02 

CHfCtf roR CACHE AND MEnORr MANAGEMENT 



5580 


0054 Ti 


000404 








5581 


005500 






002276 


11: 




005500 


012737 


177777 




5582 


005506 


104064 








5583 


005310 


052737 


000014 


177746 


4t : 


5584 


005516 


042737 


000014 


177746 




5585 


005524 


032737 


000004 


177746 




5586 


005532 


001004 








5587 


005534 


032737 


000010 


177746 




5586 


005542 


001413 








5589 


005544 








7» : 




OO J J** 




w ' Icc* 






5590 


005550 


104424 








5591 


005552 


013737 


002544 


002546 




5592 


005560 


005037 


002S44 






5593 


005564 


000404 








5594 


00SS66 








3*: 




005566 


104401 


071174 






5595 


005572 








6<: 




005572 


104401 


07 1203 
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.DSABL CRF 
BR 4$ 

SET MONFLC 



ERROR *64 

BIS •6IT2!BIT5.C0NTRL 

BIC «6IT2!BIT5.C0NTRL 

BIT •BIT2.C0NTRL 

BNE 71 

BIT •8IT3.C0NTRL 

BEQ 6< 

TYPE MSG121 

TYPEIT .riSG121 

.OSABL CRF 
CACMOTP 

nOV CACHKN.CACHKN*2 

CLR CACHKN 

BR 81 

TYPE MSG119 

TYPEIT .MSG119 

.OSABL CRF 

TYPE nSG120 

TYPEIT ,nSG120 

.OSABL CRF 



sPROCESSOR NOT SUPPORTED BY THIS DIAGNOSTIC 

nOV # l.nONFLG 

■NO MEtlORY MANAGEMENT 
I SET CACHE DISABLE BITS 
: CLEAR CACHE DISABLE BITS 
sis THE BIT SET? 
(BRANCH IF THE BIT IS SET 
lis THE BIT SET? 
(BRANCH IF THE BIT IS SET 
: CACHE BYPASSED 



;SAVE INTO ABOUT CACHE 
(CACHE CANNOT BE USED • 

i NO 



(CACHE AVAILABLE 



IT'S BYPASSED 



cvnjAao nsvii-j 

CHECK rOA CACHE 
5597 005576 
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ANO MEMORY MANAGEMENT 



SCO 0122 



5598 
5599 
5600 
5601 
5602 
5603 
5604 
5605 
5606 

5607 
5606 
5609 
5610 
5611 
5612 

5613 
5614 
5615 



005576 
OOSeOO 
005604 



005606 
005614 

005622 
005622 
005626 



104421 

005737 
001011 



042737 
0527S7 



012746 
006606 



005630 052737 



005636 
005636 
005642 

005644 



012746 
006606 



5625 005676 

5626 005700 
005700 
005702 
005706 

005712 

5627 005714 



104422 

010346 
012703 
004737 

012603 
104420 



002456 



030000 
010000 



000740 

030000 
000700 



s*, 



SUBTST << SETUP USER £ SUPERVISOR STACK >> 
- TEST SETUP USER £ SUPERVISOR STACK 



DEENERGIZE 

TST NOSUPER 

BNE 5> 



J TURN OFF MEMORY MANAGEMENT 
ilS THERE A SUPERVISOR MODE? 
sNO-SKIP SUPERVISOR SETUP. 



177776 
177776 



177776 51 ! 



I SET PREVIOUS MODE TO SUPERVISOR 
BIC «eiT13!BIT12,PSU 
BIS «eiT12.PSU 



PUSH 
MTPI 



♦SUPSTK 
SSP 



sSET PREVIOUS MODE TO USER 
BIS •BIT13!BIT12,PSU 



PUSH «USESTK 

MTPI USP 

SUBTST <<GET SOFTWARE SWITCH REGISTER IF NECESSARY>> 

i*SUBTEST GET SOFTWARE SWITCH REGISTER IF NECESSARY 



MOV «SUPSTK.-(SP) 



MOV tUSESTK. -(SP) 



5616 


005644 








005644 


005737 


002062 




005650 


001012 




5617 


005652 








005652 


023727 


002636 




005660 


001006 




5618 


005662 








005662 


012737 


177777 


5619 


005670 


104407 




5620 


005672 


005037 


002566 


5621 


005676 
005676 






5622 


005676 
005676 






5623 








5624 


005676 







000176 
002566 



IF lAUTO IS FALSE 


jIF NOT(APT OR ACT) 




TST lAUTO 




BNE L15 


IF SWR EQ «SWREG 


ilF SOFTWARE SWITCH REG SELECTED 




CMP SWR.^SWREG 




BNE L16 


SET SWRFLG 


: sSET FLG TO BUMP STACK 




MOV •-I. SWRFLG 


GTSWR 


;;GET SOFT-SWR SETTINGS 


CLR SWRFLG 


: {CLEAR IT FOR REST OF PROGRAM 


END lOF IF SWR 






L16: s i : i > 1 


ENO lOF IF lAUTO 






L15: s t i i ( t 


SUBTST <<GET MEMORY MANAGEMENT 


READY >> 



i*SUBTEST 



GET MEMORY MANAGEMENT READY 



000200 
035604 



KMAP 
MAP 

MOV 
CALL 
.DSABL 

ENERGIZE 



«200.R3 
MAPPER 
CRF 



sMAP KERNEL SPACE 1 TO 1 

(MAP SUPERVISOR SPACE (TEST AREA) 1 TO 1 

MOV RS.-(SP) 



(TURN ON MEMORY MANAGEMENT 



MOV (SP)*.RS 



CVHJAeO HSVll-J «MORY OIAG. 
GET MEnORT MANAGEMENT READY 

56S0 005716 
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NEUTST €«BIT TEST OF ALL CSR'S>> 



SEO 01, ' 



5631 
5632 
5633 
5634 
5635 
56 S6 
5657 
5638 
5639 
5640 
5641 
5642 
5643 
5644 
5645 
5646 
5647 
b646 
5649 
5650 
5651 
5652 
5653 



5654 

5655 
5656 
5657 
5658 
5659 
5660 
5661 

5662 



5663 
5664 

5665 
5666 
5667 



5668 
5669 
S670 

5671 
5672 



005716 000004 



005720 
005722 
005724 
00:>7SO 
005736 
005736 

005744 
005744 
005744 
005746 
005752 
005754 
005762 
005770 
005772 
005772 
005776 
005776 
006002 
006004 
006012 
006012 
006012 
006014 
006020 
006020 
006026 
0060S0 
0060S6 
006040 
006040 
006040 
006044 



005005 
005000 
01270S 
012737 



005713 
052705 
005004 
042760 
052760 
005013 

012713 

032713 
001403 
052760 



005013 
004737 

026027 
100004 
016037 
104021 



062700 
062703 



172100 
000001 



012737 006112 



002076 
000004 



000001 

000006 
000030 



020000 
020000 
000001 

006306 
002462 
002462 



000002 
000002 



002462 
002462 



002462 



000030 
002052 



•TEST 1 



BIT TEST Of ALL CSR'S 



TSTl: SCOPE 

• THE FIRST PART OF THE CONFIGURATION ANALYSIS DOES THE FOLLOUING: 

• 1) FINOS UHICH CSR'S RESPOND. AND PUTS THEM INTO THE CSR INFORMATION 

• TABLE. AND STORES ANOTHER BIT FOR "TOTCSRS". 

• 2) TESTS THE CSR BITS COMMON TO ALL CSR'S. 

• 3) FIGURES OUT IF THE MODULE IS A ECC. OR PARITY MEMORY 

• 4) TESTS THE BITS PARTICULAR TO THAT TYPE OF CSR. 

• 5) IF ANY BITS TEST BAD IN THE CSR UNDER TEST. THE CSR OK BIT IN THE 

• CSR INFORMATION TABLE IS CLEARED. 

• THE INFORMATION BITS ONE THROUGH THREE FORM A CODE UHICH GIVES THE TYPE 

• OF CSR: 

• ECC 

• TYPE BITO 

• MSVll-L/P 0 PARITY 

• MSVll-J 1 ECC 

• THIS MEMORY CODE WILL BE USED IN THE SECOND PART OF THIS ANALYSIS 



I* 



CLR 

CLR 

MOV 

MOV 

SET4 

MOV 

.DSABL 

REPEAT 



RS 
RO 

♦CSRADD,R3 

«1.N0PAR 

«CSRBMP 

«CSRBMP.4 

CRF 



iRS IS THE TOTAL CSR NUMBER 
RO IS A TABLE INDEX 
R3 HAS THE CSR ADDRESS 
IGNORE PARITY ERRORS 



Bl: 



TST (R3) ;DOES THIS CSR RESPOND??? 

BIS ♦I.R5 ;MARK IT IN CSR MAP 

CLR R4 : CLEAR THE LAST CSR INDICATOR 

BIC M.CSRINFOCRO) s CLEAR UNUSED BITS 

BIS «6IT4!BIT3.CSRINF0(R0) |YES-MARK IT IN CSR INFORMATION TABLE 
CLR (R3) : CLEAR THE CSR UNDER TEST 

LET (R3) «6IT13 iIS THIS AN ECC MEMORY??? 

MOV *BIT13.(R3) 

IF «6IT13 SET. IN (R3)iIS BIT 13 SET 

BIT •BIT13.(R3) 
BEQ L17 

BIS «6IT0,CSRINF0(R0)iMARK IT IN THE TABLE AS BEING A ECC MEMORY 
END 

' S S S 2 S 2 

CLR (R3) iCLEAR CSR UNDER TEST 

CALL RUCSR sBIT TEST OF ALL BITS IN CSR'S 

IF CSRINFOCRO) MI «30 tDO UE HAVE A LEGAL CONFIGURATION? 

CMP CSRINFOCRO }.«30 
BPL L20 

MOV CSRINFOCRO), BAD sMOVE IN BAD DATA 
ERROR *21 
END t 

L20s t s f s • I 

NXTCSR: ADD ♦2.R0 ;G0 TO NEXT CSR 

ADD «2.R3 :G0 TO NEXT CSR 



CVNJABO HSVll-J MEMWY OIAC. 
Tl BIT TEST or ALL CSR'S 
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5673 
5674 

5675 
5676 

5677 



5678 
5679 
5680 

5661 
5682 

5683 
5684 

5685 
5686 
5687 
5688 



006050 
006052 
006052 
006054 
006056 
006056 
006056 
006056 
006062 
006064 
006064 
006066 
006070 
006070 
006072 
006076 
006076 
006102 
006106 
006106 

006112 
006116 



006305 

103001 
005204 



020027 
001330 

006005 
005704 

001402 
052705 

010537 
004737 



062706 
000137 



000040 



100000 

002224 
006122 



C00137 007002 



000004 
006040 



22t: 



ASL R5 
ON. ERROR 

INC R4 

END 

UNTIL RO EQ «40 



ROR R5 

TST R4 
RNC 22* 

BIS MITIS.RS 
LET TOTCSRS :- R5 

CALL CSRMAP 
JUMPTO CTEST 



CSRBMP: ADO 
JMP 



♦4,SP 
NXTCSR 



s SHIFT CSR MAP 
;IS THERE A CSR 0 

: YES -SET CSR PRESENT FLAG 



BCC L21 



L21 : 1 1 I 1 1 i 
tUNTIL ALL CSR'S ARE DONE 

CriP R0.*40 
BNE Bl 

El: I i I i I i 

iRESYNC R5 
tUAS THERE A CSR 0? 
(BRANCH IF NOT EQUAL 



(YES SET IT IN CSR TABLE 
I STORE CSR MAP IN TOTCSRS 

(PRINT CSR MAP 



SEQ 0124 



BEQ 22 t 

MOV R5. TOTCSRS 
JMP CTEST 



(FIX STACK POINTER FOR NON-EXISTANT CSR TRAP 
(GO ON TO NEXT CSR 



CvnjABO nsvii-j riEnoRT oiag. 
Tl BIT TEST OF ALL CSR'S 



5690 


006122 








WV ASS 


005000 






006124 

WW AS^ 








006124 


104401 


071440 


M9S 


006130 








006130 


104401 


066134 


5694 


006134 


005001 




5695 


006136 








006136 






5696 


006136 


010102 




5697 


006140 


C22702 


000011 


5698 


006144 


100002 




5699 


006146 


062702 


000007 


5700 


006152 


062702 


000060 


5701 


006156 


110^37 


066132 


5702 


006162 








006162 


104401 


066132 


570^ 


006166 








006166 


104401 


066130 


5704 


006172 


005201 




5705 


006174 








006174 


020127 


000020 




006200 


001356 






006202 






5706 


006202 








006202 


104401 


065614 


5707 


006206 








006206 






5700 


006206 








006206 


005760 


002462 




006212 


001414 




5709 


006214 








00621^ 


032760 


000001 




006222 


001404 




5710 


006224 


112737 


000105 


5711 


006232 








006232 


000403 






006234 






5712 


006234 


112737 


000120 


5715 


006242 








006242 






5714 


006242 








006242 


000403 






006244 






5715 


006244 


112737 


000040 


5716 


006252 








006252 






5717 


006252 








006252 


104401 


066132 
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CSRMAP: SUBTST <<PRINT CSR REGISTER MAP>> 



SEQ 0125 



i*SUBTEST 



PRINT CSR REGISTER MAP 



II: 



002462 
066132 

066132 



^^066132 



CLR RO 

TYPE nSG008 

TYPEIT ,nSG008 

.0SA8L CRF 

TYPE MSG016 

TYPEIT .MSG016 

.OSABL CRF 

CLR Rl 
REPEAT 

MOV R1.R2 
CMP *9.,R2 
BPL II 
ADO •7.R2 
ADD «60.R2 
MOVB R2,MSG015 
TYPE MSG015 

TYPEIT .MSG015 

.OSABL CRF 
TYPE MSG014 

TYPEIT .MSG014 

.OSABL CRF 
INC Rl 

UNTIL Rl EQ «16. 



TYPE MSG009 
TYPEIT .nSG009 
.OSABL CRF 
REPEAT 



(CLEAR CSR INFO POINTER 
; PRINT TITLE 



s PRINT CSR NUMBERS 



B2 : : : s > : : 



sJUMP AROUNO NEXT INSTRUCTION 
I MAKE IT ASCII 



sTYPE SINGLE SPACE 



;TYPE MEMTYPE 



E2: 



CMP R1.016. 
BNE B2 



IF CSRINFO(RO) NE #0 iIS CSR NONEXSISTANT???? 
IF «BITO SET. IN CSRINFO(RO) 



B3: : : i : ; : 



MOVB *'E.MSG01S :IT IS A MSVll-J 
ELSE 



TST CSRINFO(RO) 
BEQ L24 

BIT •fllTO.CSRINFO(RO) 
BEQ L2S 



END 

ELSE 



MOVB #'P.MSG015 sIT IS A MSVll-L/P 



BR L26 
L2S : i i I i s i 



MOVB «' .MSGOIS 



END 

TYPE MSGOIS 
TYPEIT .MSGOIS 



L26: 1 ( I ; s : 

BR L27 
L2M : 1 1 1 i I i 



L27: : i i i i i 
;TYPE MEMORY TYPE 



CvnjABO nsvii-j rcnORY OIAC. 
PRINT CSR REGISTER flAP 
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5716 006256 
006256 

5719 006262 

5720 006264 

5721 006270 
006270 
006274 
006276 

5722 006276 
006276 

5725 006302 
5724 006304 



104401 066130 



000240 
062700 

020027 
001344 



000002 
000040 



104401 071542 

000207 
000000 



SEQ 0126 



. OSABL CRF 
TYPE MSG014 

TYPEIT .t1SG014 

.0SA8L CRF 
NOP 

ADO *2,R0 
UNTIL RO EQ *40 



TYPE MSG129 
TYPEIT ,MSG129 
.OSABL CRF 
RETURN 
TRACE: .UORO 0 



iTYPE SPACE 



, POINT TO NEXT ENTRY 



E3 



CMP R0.«40 
BNE 83 

: I > I > : 



CVMJAaO MSVll-J MEMORY OIAG. 
PRINT CSR REGISTER MAP 

5726 006306 



5727 
5728 
5729 
5750 
5731 
5732 
5733 
5734 
5735 
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SUBTST <<READ AND HRITE ALL CSR BITS>> 



SCO 0127 



•SUBTEST 



READ AND URITE ALL CSR BITS 



THIS ROUTINE "RUCSR" CHECK TO SEE THAT THE CSR CAN BEURITTEN ON CORRECTLY 
BY WRITING AND CHECKING FOR THE FOLLOWING PATTERNS: 

1- ZEROS 

2- ONES 

3- SHIFTING A ONE THROUGH A FIELD OF ZEROS 

4- SHIFTING A ZEROS THROUGH A FIELD OF ONES 



5756 


006306 








5737 


006306 










006306 


010446 








006310 


010546 








006312 


013746 


177640 




5738 


006316 










006316 


ClOOOS 






5739 


006320 


006205 






5740 


006322 










006322 


010537 


002152 




5741 


006326 










006326 


010337 


002034 




5742 


006332 










006332 


032760 


000001 


002462 




006340 


001403 






5743 


006342 










006342 


012705 


017740 




5744 


006346 










006546 


000402 








006350 








5745 


006350 










006350 


012705 


070032 




5746 


006354 










006354 








5747 


006354 










006354 


012737 


177777 


002322 


5748 


006362 


040537 


002322 




5749 


006366 










006366 


00501 3 






5750 


006370 










006370 


011304 






5751 


006372 


040504 






5752 


006374 










006374 


005704 








006376 


001410 






5753 


006400 










006400 


005037 


002044 




5754 


006404 










006404 


010437 


002150 




5755 


006410 


104035 






5756 


006412 


042760 


000010 


002462 


5757 


006420 










006420 








5758 


006420 









RUCSR; 



PUSH R4.R5.UIPAR0 



LET R5 

ASR RS 
LET CSRNO 



RO 



sSAVE R4.RS. AND UIPARO ON STACK 

MOV R4,-(SP) 
MOV R5.-(SP) 
MOV UIPARO. -CSP) 
:GET CSR NUMBER FOR POSSIBLE ERROR 

MOV RO.RS 



R5 



LET ADDRESS :- R3 



MOV R5. CSRNO 

(GET ADDRESS FOR POSSIBLE ERROR 

MOV R3. ADDRESS 

IF «6IT0 SET. IN CSRINFO(RO) :UHAT KIND OF MEMORY IS THIS??? iGET BIT MASKS FOR 0 

BIT •6ITO.CSRINF0(RO) 
BEQ L31 

sMASK FOR MSVll-J 

MOV 4017740. R5 

:IT IS A MSVll-L/P 

BR LS2 
LSI: i i : i t > 

(MASK FOR MSVll L/P 

MOV 4070032. RS 



LET R5 
ELSE 



•017740 



LET R5 :- 4070032 

END 

LET CSRIS :- 4177777 



I SET CSRIS TO ALL ONES 



L32: 



I 



BIC R5, CSRIS 
LET CR3) :" 40 

LET R4 :- (R3) 

BIC RS.R4 
IF R4 NE 40 



i CLEAR BITS FOR GOOD DATA 
,0 >CSR 

iMASK OUT UNWANTED BITS 



I 00 UE HAVE A CORRECT READ 



MOV 4177777. CSRIS 

CLR (R3) 
MOV CR3).R4 



LET GOOD :- 40 
LET CSR R4 
ERROR *3S 

BIC 48113. CSRINFOCRO) iCLEAR CSR OK BIT 
END 



(GOOD DATA-O'S 
tBAD DATA-CSR 

:BIT SET ERROR 



LET (RS) :- CSRIS 



tONES--->CR3) 



TST R4 
BEQ L33 

CLR GOOD 

MOV R4.CSR 

L33: ( i : : t s 



cvnjAao 


flSVll- 




DTAG 


READ AND URITE 




BITS 




006420 


015713 


002322 


5759 


006424 








006424 


Al 1 xn4 

VIA 




5760 


006426 






5761 


006450 






5762 


006452 








006452 


0304S7 


002522 




006456 


001411 

wW 4^4* 




5765 


006440 








006440 


015757 


002522 


5764 


006446 








006446 


010457 


002150 


5765 


006452 


104010 




5766 


006454 


042760 


000010 


5767 


006462 








006462 






-5768 


006462 








006462 


005057 


002264 


5769 


006466 








006466 






5770 








5771 


006466 


005257 


002264 


5772 


006472 








006472 


012757 


177777 


5775 


006500 








006500 


025727 


002264 




006506 


001005 




5774 


006510 








006510 


012702 


000001 


5775 


006514 








006514 


000402 






006516 






5776 


006516 








006516 


012702 


177776 


5777 


006522 








006522 






5778 


006522 








006522 






5779 


006522 


005257 


177640 


5780 


006526 








006526 


025727 


002264 




006554 


001006 






006S56 


052760 


000001 




006S44 


001002 




5781 


006546 


042702 


040000 


5782 


006SS2 








006SS2 






5785 


006SS2 








006552 


025727 


0O2264 




006560 


001006 






006562 


052760 


000001 




006570 


001002 




5784 


006572 


042702 


040004 


5785 


006576 








006576 






5786 


006576 








006576 


010215 
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SEQ 0128 



002044 



002462 



177640 
000001 



000001 
002462 



000002 
002462 



LET R4 (R5) 

CLR (R5) 

BIC R5.R4 

IF R4 NE CSRIS 



LET GOGO :- CSRIS 
LET CSR R4 
ERROR *10 

END 

LET PASFLG 
REPEAT 



nOV CSRIS. (R5) 
nOV (R5).R4 



BIC «eiT5.CSRINF0(R0) iCLEAR CSR OK BIT 
*0 



(MASK OUT CORRECT FIELD 
i CLEAR OUT CSR 
juAS PATTERN URITTEN CORRECTLY? 

CnP R4. CSRIS 
BEQ L54 

iGOOO DATA - ALL LEGAL BITS SET IN CSR 

nOV CSRIS. GOOD 

iBAO DATA-CSR 

nOV R4.CSR 

I BIT CLEAR ERROR 



L54: ; 1 1 i i I 

I SET UP LOOP COWTER 

CLR PASFLG 
:REPEAT WITH A FIELD OF I'S THROUGH 0' S 

B4 : I i 1 1 i i 
O'S THROUGH I'S 

(INCREMENT LOOP COUNTER 
(USE USER PAR FOR BIT COUNTER 

MOV *-l.UIPARO 

»PA«;S 1 

CMP PASFLG. #1 
BNE L55 

.1 >FIELO OF ZEROS 

MOV «1.R2 

(PASS 2 

BR L56 

L55: i i I i : t 

LET R2 #177776 jO >FIELD OF ONES 

MOV #177776. R2 



INC PASFLG 
LET UIPARO :- # 1 

IF PASFLG EQ #1 

LET R2 :- #1 
ELSE 



END 

REPEAT 

INC UIPARO 



L56: s i : i I ; 

iDO BITS 0-4 AND 15-15 

B5 : : i s i t ; 

{INCREMENT BIT POINTER 
IF PASFLG EO #1 AND «eiTO OFF. IN CSRINFO(RO) i 

CMP PASFLG. #1 
BNE L57 

BIT «eiTO.CSRINFOrRO) 
BNE L57 

BIC «eiT14.R2 :IF THIS IS PASS 1 ON A MSVll-L/P. CLEAR BIT 14 
END i 

L57 : t t i 1 1 1 

IF PASFLG EQ #2 ANO «eiTO 0-F.IN CSRINFO(RO) > 

CMP PASFLG. #2 
BNE L40 

BIT «eiTO.CSRINFO(RO) 
BNE L40 

BIC «eiT14!BIT2,R2 iIF THIS IS PASS 2 ON A MSVll-L/P. CLEAR ECRSRO BIT AND 
END I 

L40: 1 1 I I i i 

LET (R5) :- R2 iMITE DATA 

MOV R2.(R5) 



cvnjAao nsvii-j HEnoRr oiac. 
READ AND WRITE ALL CSD BITS 
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SEQ 0129 



57S7 


006600 








006600 


010201 




S7S8 


006602 


040501 




S769 


006604 








006604 


011304 




57»0 


006606 


040504 




5791 


006610 








006610 


020104 






006612 


001416 




5792 


006614 








006614 


010137 


002044 


5793 


006620 








006620 


010437 


002150 


5794 


006624 








006624 


023727 


002264 




006632 


001002 




5795 


006634 


104035 




5796 


006636 








006636 


000401 






006640 






1/97 


006640 


104010 




5798 


006642 








006642 






5799 


006642 


042760 


000010 


5600 


006690 








006650 






5601 


006650 








006650 


023727 


002244 




006656 


001002 




5602 


006660 


006302 




5603 


006662 








006662 


000402 






006664 






5604 


006664 


000261 




5605 


006666 


006102 




5606 


006670 








006670 






5607 


006670 








006670 


023727 


177640 




006676 


001311 






006700 






5606 


006700 








006700 


023727 


002264 




006706 


001267 






006710 






5609 


006710 








006710 


032760 


000001 




006716 


001402 






WU6720 


000137 


UUO 'DO 




006724 






5610 


006724 








006724 


012713 


140005 


5611 


0067S0 








0067SO 


011302 




5612 


006732 


042702 


037772 


5613 


0067S6 








0067S6 


020227 


140005 



000001 



002462 



000001 



000017 



000002 



002462 



LET Rl :- R2 

BIC R5.R1 

LET R4 :- (R3) 

eiC R5.R4 
IF Rl NE R4 



I GET COCO DATA ANO MASK IT OUT 

(GET GOOD DATA 

I GET DATA THAT IS READ 

J MASK OUT CSR BITS 
:IS DATA CORRECT??? 



LET COOO :- Rl tBAD DATA - CSR CONTENTS 
LET CSR :- R4 (GET GOOD DATA 
IF PASFLG EQ tl ; SELECT ERROR DEPENDING ON PASS 



ERROR *3S 
ELSE 



ERROR *10 
END 



;BIT SET ERROR 
iPASS 2 



>BIT CLEAR ERROR 



nov R2.R1 

NOV (R3).R4 

CnP R1.R4 
BEQ L41 

nov Rl.GOOO 

nov R4.CSR 

CMP PASFLG. #1 
BNE L42 



BR L43 

L42: t I I I I I 



BIC «6IT3,CSRINF0(R0) (CLEAR CSR OK BIT 



L43: ; 1 1 1 1 1 



END 

IF PASFLG EQ «1 



ASL R2 

ELSE 



{GET DATA FOR NEXT LOOP 



I SHIFT 1 ACROSS O'S 

i 



L41 : t > i 1 1 > 



CtIP PASFLG. #1 
BNE L44 



END 



SEC 

ROL R2 



BR L45 

L44 : t i I i i ; 

I SET CARRY 

{ROTATE A 0 ACROSS A FIELD OF ONES 



UNTIL UIPARO EQ •15. tUNTIL ALL BITS ARE DONE 

CflP UIPARO. •IS. 
BNE BS 

UNTIL PASFLG EQ ^2 (DONE WITH 2 PASSES •>>><<> 

CHP PASFLG. ^2 
BNE B4 

IF «eiTO SET. IN CSRINFO(RO) THEN JUnPTO DONE iIF nSvll-L/P 00 ONE LAST URITE 

BIT «eiTu.CSRINFO(RO) 
BEQ LSO 
jnP DONE 

LSO: I i i t > I 

LET (RS) •140005 lURITE ONES TO CSR UITH ECSRRO BIT ENABLED 

NOV •140005. (R3) 

LET R2 :- (RS) iREAD CSR FOR CORRECT BITS 

nov (R3>.R2 

BIC •37772. R2 iCLEAR UNWANTED BITS 

L<P R2 NE •140005 lUAS URITE CORRECT 

CHP R2.^140005 



CVHJA60 MSVll-J KtlORY OIAC. 
Rmr AND URTTE ALL CSP BITS 





006742 


001411 




5614 


006744 








006744 


012757 


140005 


561S 


006752 








0067S2 


010257 


002150 


5616 


006756 


104010 




5617 


006760 


042760 


000010 


S616 


006766 
006766 






5619 


006766 
006766 


005013 




5620 


006770 








006770 


012637 


177640 




006774 


012605 






006776 


012604 




5621 


007000 


000207 
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002044 



002462 



DONE: 



LET GOOD 
LET CSR : 



• »140005 

R2 



iGOOO DATA 
I BAD DATA 



ERROR *10 iBIT CLEAR ERROR 

BIG •eiT3.CSRINF0(R0) iCLEAR CSR OK BIT! 
ENO I 



LET (R3) #0 
POP UIPAR0.R5,R4 

RETURN 



BEQ L51 

nov «140O05.G0O0 
hOV R2.CSR 



(CLEAR OUT CSR 
(RESTORE UIPAR0.R4. ANO R5 



L51 ; i i i ( I I 

CLR (R3) 



MOW (SP)».UIPARO 
MOV (SP)..R5 
MOV (SP)*,R4 



SEQ 0130 



CVMJA80 MSVll-J nEnORY OIAC. 
READ AND URITE ALL CSR BITS 
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SEQ 0131 



SS24 
5825 
5826 
5827 
5828 
5829 
5890 
5831 
5832 
5833 
5854 
5835 
5836 
5837 
5838 
5839 
5840 
5841 
5842 
5843 
5844 
5845 
5846 
5847 
5848 
5849 
5850 
5851 
5852 
5853 
5854 
5855 
5856 
5857 
5858 
5859 
5860 
5861 
5862 
5863 
5864 
5865 
5866 
5867 
5868 
5869 
5870 
5871 
5872 
5873 
5874 
5875 
5876 
5877 
5878 



007002 
007004 
007012 
007020 
007024 
0070S2 
007040 
007042 
007046 
007052 
007054 
007056 
007060 
007064 
007070 
007072 
007074 
007076 
007100 
007102 
007110 
007112 
007120 
007126 
007134 
007140 
007142 
007150 
007156 
007164 
007172 
007176 
007202 
007210 
007212 
007214 
007216 
007220 
007222 
007226 
J72S2 
007236 
007240 
007242 
007246 
007250 
007252 
007260 
007266 
007274 
007276 
007302 
007310 
007310 









i THE 


FOLLOWING 


ROUTINc UETcHniNcb Wnltn 


^CD rOklTDOl C DD Ar'D AM CDA^C 


104424 






1 

CTEST 


CACMOFF 






012737 


1 777/7 


002552 




nov 


• 1 f f f f f , KunLbH 




012737 




9 ?'9VKA 

172350 




MAu 

nov 


#200U , In 1 K W# 


. CCT 1 ID MAD DCrTCTPD 


012701 








MAU 

nov 


ATCCTAAA D1 

V 1 1 MUU • HI 




012757 




002412 




MAU 

nov 






012737 


9 AAAA^ 


0024 1# 




MAU 

nov 


A9AAAA9 TCCTAAA^9 

#100002« TcbTnDD92 




003VVV 








n D 

LLn 


DA 


. n PAD TQP rniiNTPP 


005037 








LLn 






013703 








MAU 

nov 


I U 1 LbK3 , N J 


. ADTATM rCD MAD 
] UD 1 nxni Ldn nnr 


000240 








MAD 




• ACPI If: ATA 
) UCDUu MXU 


AAA VAV 








ACI 


DT 

K 3 


*DllT MTftM APAPP PTT TMTA t RTT 










DLa 


C • 


• DDAia^U TC rCD FVTCTC 
; DnMn^n x* i.9n CAXd i 9 


AA^'7AA 

062 'OO 






It. 


AAA 


A3 OA 


» 1 IDA ATP TQD rni IMTPD 


At AAV7 








nuv 


DA rCDMA 




AAV7AV 








TCT 


DX 


, TC HAP PMPTY7 


A/i1 A£i^ 








RPO 
DCU 


X ft 

O 9 


• RPAMCH TP 


OOW 'O ' 








BO 






^AA^AA 






9 A • 






• APPlin ATA 
; UCD^A* nxu 














t n PAP TARRY 


AV07&A 
09c 'OO 








RTT 

Ol 1 


MTTA rCDTMPnrPA 
vox 1 V t nv / 


f TC THTC PAPTTY MPMARY? 

i Xw 1 nx9 r nnx i ■ rib nun ■ r 


AA1 A1 A 








RMP 

one 


9 9 


(RPArM TP MAT 


U3c 'DO 




1 791 AA 




RTC 


MTT9 rcDAnnrDA ^ 


■ CPT URTTP UOnMT PAPTTY 


rtl 3771 




AAA AAA 






A19XA^ Of Ol ^ 
V Xc^^TO ■ WV nX ^ 


f URTTP AATA 
i vnx 1 w 1 n 


A1 977 1 
UlC III 




AAAAA3 




nuw 


vXs0^90 ff tfc^ nx t 




AAC/^A 












-PPCTAPP TCP 
;nC9lUnc l.9n 


AAAA 1 A 








HP 


D • 




A1 3 7AA 


WVWV 


1 791 AA 


> 


MflU 


AA roBAnnfpA') 


• n PAR THP TCP iiMnrp TPCT 


A1 377 1 

OlC III 




AAAAAA 




rnjw 


A1 9XA^A afpi 
VXc^^vv t V\ nx y 


f URTTP liATA 


A1 077 1 
Ulc III 




AAAAA9 




MflV 


VXC^^Tv ■ V£\ nX 7 




A1 97iLA 




1 791 AA 




f IWw 




f CPT DTAH thptk Mnnp 

i WW 1 l/Xnu WriCWV riwc 


AA^771 


vWVW 




tkt • 
D* : 


1 9 1 


af RI ^ 


•URTTP rHPTKATTC TH TCP 


At AAAA 
U10004 


1 731 /V\ 
1 r cl W 










t URTTP TCP TA PA 


AV97&A 




AA9AIL9 




RTT 


VOX 1 V ■ l»9nxfw Ul "V i 


9 PAPTTY MFMARY? 


AA 1 AAY 








RMF 


7i 
f • 


• RPAMTH TP MAT 










1 9 1 




•PAPTTY PRRAR7 










RMT 


Mft 
O • 


«RRArH TP QA 
SOnnun xr 3u 


/^A79A 
woo rcU 








RP 
Off 


1 i 
X ▼ 


•TRY MPVT rCP 








7 i • 


MOP 




.ApRijf; ATD 




1 7777X 






ASH 






AA97AA 


1 777ftft 
Iff f SAf 






RTr 


#tr77 RA 

V ■ ^ f r y 




A1 07A9 
UlC 'Oc 


AAA AAA 








AAA 09 
v^v • 


*l AAA TM PARPPrT THPriT RTTC PAR 










THP 


R9 RA 


iTARRPrT rHPrKRTTC? 


001307 








RMP 
one 




1 RPAMTH TP MAT 


A t AAV7 

wl W J r 


AA3^X3 




Hi • 

99 i 


HOW 


PA Pf^Mr^R 










09 I 


MOP 




.APRUG AID 

i 1/wOVw 


104502 








CLRCSR 




s CLEAR ALL CSR'S 


012771 


OOOOOO 


000000 




nov 


•O.S(Rl) 


.■RESTORE TEST LOCATIONS 


012771 


000000 


000002 




nov 


«0.82(R1) 




023727 


002532 


177777 




cnp 


PCnCSR. #177777 




001402 








BEQ 


FINTI 


:IF PROGRAn CSR NOT FOUND GO TO 


000137 


007320 






jnp 


CLRnEn 


:G0 TO SIZING ROUTINE IF FOUND 


0127J7 


001000 


172350 


FINTI 


nov 


«1000.KIPAR4 








TYPE 


nSG126 


! ERROR PROGRAn CSR NOT FOUND* 


104401 


071334 






TYPEIT 


.nSG126 












.OSABL 


CRF 
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READ AND WRITE A(.l. CSR BITS SCQ 01S2 

5879 007514 005057 002552 CLR PCMCSR jSET TO DEFAULT OF 0 



5881 007520 



5882 
5885 
5884 
5885 
5886 
5887 



SUllTST <<CLEAR ALL MEMORY SPACE FROM BANK d 0N>> 



[•SUBTES' 



CLEAR ALL MEMORY SPACE FROM BANK 2 ON 



iTHIa ROUTINE CLEARS ALL MEMORY SPACE BEGINNING AT ADDRESS 200.000 AND 
•CONTINUES UNTIL THERt IS NO MEMORY LEFT. IT SHOULD CLEAR ANY PARITY ERRORS 
(CREATED BY THE LAST ROUTINE. AND CLEAN UP ANY JUNK LEFT HANGING AROUND IN 
{HIGHER MEMORY. 
I 



5888 


007S20 










007S20 


012737 


007430 


000004 


5889 


007526 


005057 


006504 




5890 


OOr332 






VVcO ro 


S891 


007540 


C12757 


002000 


172350 


5892 


007546 


012701 


100000 




5895 


007552 


020127 


117776 




5894 


007 SS6 


001005 






5895 


00756'' 


012757 


177777 


006304 


5896 


007566 


005021 






5897 


007570 


005757 


006304 




5898 


007574 


001001 






5899 


007376 


000765 






5900 


007400 


062737 


000200 


172350 


5901 


007406 


022757 


177600 


172350 


5902 


007414 


001405 






5905 


007416 


005057 


006304 




5904 


007422 


012701 


100000 




5905 


007426 


000751 






5906 


007450 


000240 






5907 


007432 


005057 


006504 




5908 


007436 










007436 


012757 


054002 


000004 




007444 


022757 


000005 


004064 




007452 


001002 








007454 


005037 


177766 






007460 









1«: 



2»: 



31: 



CLREX: 



101 1 i 



SET4 


♦CLREX 


;NONCM TRAPS GO TO CLREX 


MOV 


•CLREX .4 




.OSABL 


CRF 




1>LN 






MOV 


«1.N0PAR 


i IGNORE PARITY ERRORS 


MOV 


42000. K IP AR4 


iSET UP MAP TO START AT BANK 2 


MOV 


4100000. Rl 


iRl MAPS TO KIPAR4 


CMP 


Rl. 4117776 


iUHOLE 16K BANK DONE? 


BNE 


2« 


:KEEP GOING IF NOT 


MOV 


♦1. TRACE 


:USE TRACE FLAG TO FLAG END OF BANK 


CLR 


(RD* 


1 CLEAR CONTENTS L INCREMENT 


TST 


TRACE 


:EOB FLAG SET? 


BNE 


31 


iGO TO NEXT BANK IF SO 


BR 


1* 




ADO 


4200.KIPAR4 


;SET MAP FOR NEXT BAfJK 


CMP 


4177600. KIPAR4 


sARF WE AT THE PERPHERIAL PAGE 


BEQ 


CLREX 


.YES GO ON 


CLR 


TRACE 


jRESET FLAG 


MOV 


4100000, Rl 


sRESET Rl 


BR 


It 


: CLEAR NEXT BANK 


NOP 






CLR 


TRACE 




RES4 






MOV 


•TIMEOUT. 4 




CMP 


•5.PR0TYP 


sis THIS AN 11/83/84 ? 


BNE 


lOlt 


t BRANCH IF NCT 


CLR 


CPUERR 


{CLEAR OUT THE CPU ERROR REGISTER BITS 



.DSA6L CRF 



{THAT A EXPECTED TRAP COULD HAVE SET 



CvnjAeO nSVll J rcnORV OIAC. riACRO Y05.02 rionday 07 Oct 85 16:57 P»g« 142 
CLEAR ALL rCfORT SPACE rt*On BANK 2 ON 



SEQ DISS 



5911 007460 



5912 
5913 
5914 
5915 
5916 
5917 
5916 
5919 
5920 
5921 
592C 
592S 
5924 
5925 
5926 
5927 
5926 
5929 
S9S0 
59S1 
S9S2 
5933 
5934 
5935 



5956 


007460 










007460 


012737 


010532 


000004 


5937 


007466 


005037 


002314 




5936 


007472 


012701 


002412 




5939 


007476 


013703 


002224 




5940 


007502 


005000 






5941 


007504 


005005 






5942 


007506 


005737 


002454 




5943 


007512 


001403 






5944 


007514 


005037 


002560 




5945 


007520 


000413 






5946 


007522 


022737 


000177 


002556 


5947 


007550 


001407 






5946 


007532 


013702 


002556 




5949 


007536 


005202 






5950 


007540 


072227 


000011 




5951 


007544 


010257 


002560 




5952 


007550 


012702 


000004 




5953 


007554 


005037 


002564 




5954 


007560 


012737 


OUIOOO 


172350 


5955 


0075M 


0127S7 


001000 


172352 


59S6 


007574 


006503 






5957 


007576 


105420 






5956 


007600 


062700 


000002 




5959 


007604 


010037 


002152 




5960 


007610 


005703 






5961 


007612 


001570 






5962 


007614 


012737 


001000 


172350 



ANA2: SUBTST 
•SUBTEST 



<<MATCH «LL CSP'S UITH nEnORV>> 
MATCH All CSR'S UITH MEnoRr 



• THE SECOND PART OP THE ANALYSIS MATCHES UP THE CSR'S UITH THE MEMORY . AND 

• INSTALLS ALL THE INFORMATION TOUND IN THE CONFIGURATION TABLE. FOR ECC. 

• THIS IS DONE BY TAKING EACH CSR FOUND IN THE PREVIOUS SECTION SEQUENTIALLY 

• AND CHECKING THROUGH ALL OF MEMORY. ONE BANK AT AT TIME. TO SEE UHICH BANKS 

• RESPOND TO THE CSR IN QUESTION. THE FIRST DOUBLE UORO PAIR IN EACH BANK IS 

• URITTEN UITH DATA AND DIAGNOSTIC CHECK MODE SET IN THE CSR AND ARE CHECKED 

• FOR EACH BANK THROUGH USE OF TESTADD AND KERNEL INSTRUCTION PAGE ADDRESS 
« REGISTERS 4 AND 5. IF UE GET THE PROPER CHECKBITS BACK. UE HAVE A MATCH. 

• IF NOT. THE ROUTINE CHECKS FOR SINGLE OR DOUBLE BIT ERRORS. 

• IF ONE OR THE OTHk'R IS FOUND. THE ERROR ADDRESS IS CHECKED 

• TO SEE IF IT IS THAT BANK. IF IT IS. UF HAV£ A MATCH, AT THE END OF EACH 

• BANK PASS. FOR EACH CSR PASS. THE PROGRAM COMES UP UITH A NUMBER. STORED IN 

• "I". UHICH DENOTES THE FOLLOUING: 



MEMORY DESCRIPTION 

NON-EXISTANT MEMORY 
MSVll-L/P MEMORY 
MSVll-J MEMORY 



• I 
• 

• 0 

• 1 

• 2 
* 

• NOTE THAT PARITY MEMORY URITES URONG 
FOR THE PARITY ERROR BIT TO BE SET. 

I* 



7»: 



1(: 



21: 



SETA 


«100t 


MOV 


«100».4 


.DSABL 


CRF 


CLR 


CHECK 


MOV 


♦TESTADD. Rl 


MOV 


T0TCSRS.R3 


CLR 


RO 


CLR 


R5 


TST 


N022BIT 


BEQ 


7» 


CLR 


LASTBLOCK 


BR 


It 


CMP 


♦177.LASTBANK 


BEQ 


It 


MOV 


LASTBANK.R2 


INC 


R2 


ASH 


♦9. .R2 


MOV 


R2. LASTBLOCK 


MOV 


•4.R2 


CLR 


ENDFLG 


MOV 


•1000.KIPAR4 


MOV 


•1000.KIPAR5 


ASL 


RS 


BCS 


St 


ADD 


«2.R0 


MOV 


RO.CSRNO 


TST 


RS 


BNE 


2t 


MOV 


•1000.KIPAR4 



PARIT^' TO THE DOUBLE UOROS. THEN LOOKS 
IF THE BIT IS SET. UE HAVE A MATCH. 

:NE MEMORY TRAPS GO TO 100 t 



CLEAR CHECK 

SET UP THE VIRTUAL AODR. POINTER 

MOVE CSR MAP INTO RS 

CLEAR THE CSR POINTER 

CLEAR THE PROGRAM CSR STATUS POINTER 

DO UE HAVE 22 BIT ADDRESSING ? 

BRANCH IF UE DO 

ADJUST LASTBLOCK INDICATOR FOR 124K MACHINE 
BRANCH OVER NEXT PIECE OF CODE 
IS THERE Q-BUS MEMORY ABOVE 17776000? 
BRANCH IF NOT 

SET UP A NEW LAST BLOCK INDICATOR 



iR2 IS INDEX FOR CONFIG TABLE 

> CLEAR END OF MEMORY FLAG 

iSET KIPAR4 FOR BANK 1 

sSET KIPAR5 FOR BANK 1 

.DOES THIS CSR EXIST? 

{BRANCH IF IT DOES EXIST 

5 INCREMENT THE CSR POINTER 

(STORE IT IN CSRNO ALSO 

iARE THERE ANY MORE CSR'S TO 00? 

: BRANCH IF ALL CSRS NOT DONE 

: RESTORE KIPAR4 



cvnjASO nsvil-J nEnoRY oiag. 

M«TCM *LL CSI»'S WITH MEHOPY 





r\/\ 7A 33 


01 07X7 
Vic ' 3 r 


001 900 
WXc W 


1 79'VS9 
A ■ c 




MOV 




/\/^7A 


A1 Xlf^^ 
UX 3 r UO 


009*h7A 
Wc3 • ^ 






nnv 








01 OSA9 
VX V3^c 








C AAA 




n 1 AOX7 


OO01 S9 




99 i 


MOV 












A « 


wnw«w« ■ 


5968 


007646 


000240 








NOP 


5969 


007650 


012757 


100000 


002412 


45<: 


nov 




AA7<LS# 


Ulc f O f 


AC^AA/s 


A^ 




HOW 

> iw V 


*107 1 


<W>7ILiLA 






009664 
Wkww^ 




BIT 

OA I 


3^ f c 


A07IL79 
r O f s 


001409 








BE'O 






MMI X7 


V A w^ 






JMP 


^074 










411 • 


a R 


^Q7^ 




W9 • « A 


wvwv 




41 • 


TST 

1 O 1 




00771 O 


005'>S7 








INC 




OO77P0 


01 7146 

VA ' A^w 

01 7146 
WA ' A^w 


www 

wWWfc 






PUSH 

r V 


3 y f O 


00779A 


O19760 

V ' WW 


vwwx 


OOP46P 

WC~wC 




BIT 

VA * 


^Q7Q 


0077XP 


W Aw A^ 








BNE 




0077S4 




000004 
vww^ 


172100 

X ' C AW 




BIS 


? 70 X 


00774P 


01P771 
vxc * • X 


1PS4S6 

XC «9^^V 


OOOOOO 

wwww 




MOV 






VXS ■ ■ X 


1PS4S6 

XC <9^^V 


000002 




nov 


SMS 




005060 

W JWV 


17P100 

A * C AW 






CLR 






000411 








BR 




007764 


01P771 


123456 


OOOOOO 


341 : 


MOV 


J TO V 


00777P 


01P771 

VAC f f A 


123456 


000002 




nov 




010000 

VX WW 


104503 








CLRICSR 


5988 


010002 


104475 








CBICSR 


5989 


010004 


000240 








NOP 




wi WW 


005771 


OOOOOO 

WWW 




4X1 : 


TST 


J » » A 


w A WAS 


1044P6 








READCSR 




V A W 


000P40 

WWK^W 








NOP 




w A W Aw 


013704 


002150 






MOV 




V AWss 


WWK^w 








NO' 


SMS 


w A Wfc^ 


0104S7 


00P4S4 






NOV 




w AW 


A w^ Jw*' 








CLRICSR 


S447 


VAW 

W A WJC 

V X vv«^w 


01P671 

VACw f A 

01P671 


000002 
OOOOOO 

www V 






POP 




01004P 

WX W^fc 


032760 


OOOOOl 


002462 




BIT 


S999 


010050 


001004 








BNE 


www 


OiOOtP 


005704 








TST 


6001 


010054 


100420 








BNI 


600P 


010056 

Vi w^w 


000137 


010430 






JHP 




01006P 

V AVWC 


07P4P7 


177773 




42$ : 


ASH 




010066 

WW 


042704 


177700 






BIC 




01007P 

VX W r S 


01P737 

VAC f f 


000040 

WWW • w 


002316 




NOV 


6006 


010100 


000240 








NOP 


6007 


010102 


023704 


002316 




77»: 


CMP 


6006 


010106 


000240 








NOP 


6009 


0101 10 


001402 








BEQ 


6010 


010112 


000137 


010256 






jriP 


6011 












!• 


6012 












i* WE C( 


6013 












J* 


6014 


010116 


010004 






251: 


NOV 


6015 


010120 


000240 








NOP 
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•1200.KIPAR5 

KSTACK.SP 

SUBAAS 

RO.CSRNO 



#100000. TESTAOD 

«12OOO2.TESTA00*2 

•BIT5.C0NFIG(R2) 

43* 

6« 

I 

8(R1) 
I 

8(R1).82(R1) 



«BITO.CSRINFO(RO) 
34* 

«BIT2.CSRA00(R0) 

*1234S6.a(Rl) 

•123456, a2(Rl) 

CSRADDCRO) 

41» 

«1234S6.8(R1) 
«123456.82(R1) 



8CR1) 

CSR.R4 

R4 . TEMP 

82(R1).8(R1) 



«eiTO.CSRINFO(RO) 

42 « 

R4 

25 1 

6t 

#-5.R4 

#tC77.R4 

«40.CBITS 

CBirS.R4 

25* 

221 



R0.R4 



:RCSTORE KIPAR5 
t RESTORE STACK 

;J'JMP TO SUBAAS IF ALL CSR'S ARE DONE 
iMAKE SURE CSRNO IS JPDATED 
iTURN THE CACHE OFF 

tSET UP VIRTUAL ADORESS TO KIPAR4 

tSET UP VIRTUAL ADCRESS TO KIPAR5 

lis THIS A BANK TO SKIP ECC/LOCIC TESTS7 

iNO BRANCH AROUND NEXT INSTRUCTION 

sYES - GO TO END OF BANK 

t CLEAR THE MEMORY CONFIGURATION COUNTER 

;TEST TO SEE THAT THERE IS MEMORY PRESENT 

; MEMORY PRESENT 

iSAVE THE LOCATIONS UNDER TEST 

MOV 8(R1).-(SP) 
MOV 82(R1).-(SP) 

[IS THIS PARITY MEMORY? 

iNO - BRANCH 

:SET WRITE WRONG PARITY 

:SET THE FIRST LOCATION UNDER TEST 

jSET THE SECOND LUT 

i CLEAR THE CSR 

[TEST LOCATIONS 

J SET THE FIRST LOCATION UNDER TEST 
iSET '^HE SECOND LUT 
8 RESET CSR 

sSET DIAG. CHECK MODE IN CSR UNDER TEST 
i DEBUG AID 

iREAD THE FIRST LUT TO WRITE CKBITS. INTO CSR 
iREAD THE CSR UNDER TEST 
: DEBUG AID 

:GET THE CHECKBITS FROM THE CSR 
i DEBUG AID 

:SAVE IN TEMP FOR LATER 
: RESET CSR 

:RESTORE LOCATIONS UNDER TEST 

MOV (SP)*.82(R1) 
MOV (*■«»). .8(R1) 

J IS THIS PARITY MEMORY? 
:N0 - BRANCH 

sDID WE GET A PARITY ERROR? 
sYES - FILL IN CONFIG TABLE 
:N0 - JUMP TO END OF BANK 
jMANIPULATE THE CSR BITS 
:INTO A USABLE FORM. 
jMSVll-J CHECK BITS 
:DEBBUGGING AIDE 

iDO THE CHECKBITS COMPARE TO WHAT WAS WRITTEN? 
iDEBBUG AIDE 

: BRANCH IF THERE IS A MATCH 
sELSE BRANCH IF NOT THE SAME 

MATCH 

iGET THE CSR NUMBER 



CVMJABO MSVll-J 
MATCH ALL CSR'S 

6016 010122 

6017 010124 

6018 010126 

6019 010132 

6020 010156 

6021 010142 

6022 010146 

6023 010190 
6024 

6023 
6026 

6027 010154 
6026 010162 

6029 010164 

6030 010170 

6031 010176 

6032 010200 

6033 010204 

6034 010210 

6035 010214 
6056 010216 
6037 010224 

6036 010230 
010930 

6039 010236 

6040 010244 

6041 010252 

6042 010254 
6043 

6044 
6045 

6046 010256 

6047 010264 
6046 010266 

6049 010270 

6050 010274 

6051 010302 
010302 
010304 

6052 010306 

6053 010312 

6054 010316 

6055 010322 

6056 010330 

6057 010334 
6056 010342 

6059 010346 

6060 010350 

6061 010352 

6062 010354 

6063 010356 
010356 
010360 

6064 010362 

6065 010366 

6066 010372 

6067 010374 



rcnORY OIAG. 
WITH rcnORY 

006204 
000304 

042704 170377 
050462 002664 
016004 002462 
042704 177770 
000304 

050462 002666 



022737 001000 
001402 

000137 010430 

032737 100020 
001417 

013704 C02434 

072427 17/767 

022704 000001 
C03010 

052762 000001 

105262 002666 

012737 177777 

053737 002670 

053737 002672 
000240 
000465 



032737 100020 

001001 

000460 

013704 002152 
042764 000006 

010046 
010146 

016401 172100 
072127 177773 
042701 177600 
052764 040000 
016400 172100 
042764 040000 
042700 177037 
006300 
006300 
060001 
010104 

012601 
012600 

072427 000005 
020437 172350 
001001 
000403 



fMCRO Y05.02 
ISt: 

172350 241: 
002434 SOI: 

002664 

002450 
002664 101 : 
002666 

002150 22* : 
61: 

172100 

172100 
172100 

27$: 
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SEQ 0135 



ASR 
SUAB 

BIC 
BIS 

nov 

BIC 
SUAB 
BIS 
«• 

I* THIS 
«• 

criP 

BEO 

JMP 

BIT 

BEQ 

MOV 

ASH 

CMP 

BGT 

BIS 

INCB 

SET 



R4 
R4 

#170377. R4 

R4.C0NFIG(R2) 

CSRINF0(R0).R4 

•tC7.R4 

R4 

R4.C0NFIG»2(R2) 



,SET IT UP F0« USE IN THE 

> CONFIGURATION TABLE. 

I CLEAR OFF EXTRANEOUS BITS 

(PUT CSR NUMBER IN CONFIG. TABLE 

;GET MEMORY TYPE 

;CLEAR OFF THE EXTRANEOUS BITS 

I MOVE INTO PROPER POSITION 

;SET IT INTO THE CONFIG TABLE 



SECTION IS EXECUTED ONLY UHEN THE BANK-1 



•1000.KIPAR4 

301 

6t 

•eiT15!BIT4.TEMP 
101 

TEMP.R4 
«-9. .R4 
♦1.R4 

lot 

«eiT0.C0NFIG(R2) 

C0NFIG*2(R2) 

CONFGERROR 



BANK 



CONFIG *4, CONFIG 
C0NFIG*6.C0NFIG*2 

6« 



s DEBUG AID 
; BRANCH 



BIS 
BIS 
NOP 
BR 
;* 

IF CHECKBITS DID NOT MATCH. UE COME HERE 

BIT 
BNE 
BR 
MOV 
BIC 
PUSH 



sis THIS BANK 1 ? 
t BRANCH IF TRUE 
:ELSE JUMP TO END OF THIS 
tUAS THERE A SBE OR OBE? 
; BRANCH IF NOT 
J GET CSR CONTENTS 
:MAKE ERROR ADDRESS INTO BANK * 
(ERROR IN BANKS 0 OR 17 
1 BRANCH IF NOT 

{SET ERROR FLAG IN CONFIG TABLE 
I ADD ONE TO BANK ERROR COUNT 
: PRINT CONFIG TABLE 

MOV 9 1. CONFGERROR 
sSET UP INFORMATION IN BANK ZERO 



«6IT1S!BIT4.CSR 

6* 

61 

CSRN0.R4 

«6.CSRADD(R4) 

RO.Rl 



SET? 



:SBE OR DBE FLAGS 
(BRANCH IF TRUE 

{CHECK TO SEE IF IT IS MSVll-J 
{GET CSRNO 

{TURN OFF OIAG CHECK £ ECC DISABLE 
{SAVE RO C Rl 



MOV 
ASH 
BIC 
BIS 
MOV 
BIC 
BIC 
ASL 
ASL 
ADO 
MOV 
POP 



ASH 
CMP 
BNE 
BR 



CSRAD0(R4).R1 

♦-5.R1 

♦rC177.Rl 

♦BIT14,CSRADD(R4) 

CSRADD{R4).R0 

«eiT14.CSRA00(R4) 

♦tC740.R0 

RO 

RO 

RO.Rl 
R1.R4 
Rl.RO 



«5.R4 
R4.KIPAR4 
28* 
35* 



{GET CSR INFORMATION 
{SET UP ERROR ADDRESS 



MOV 
MOV 



RO. 
Rl. 



(SP) 
(SP) 



GET EXTENDED ERROR ADDRESS BITS 
READ FROM CSR 
TURN OFF EQB BIT 
SET UP EXTENDED BITS 



{SET UP TOTAL 
I SAVE IN R4 
{RESTORE RO C 



ERROR ADDRESS 
Rl 



MOV (SP)*.R1 
MOV (SP)».RO 
{SET ERROR ADDRESS UP IN PAR NOTATION 
DOES IT EQUAL KIPAR47 
BRANCH IF FALSE 

YES - MARK INFO IN CONFIG TABLE 



CvriJABO MSVll-J MEMORY DIAC. 
MATCH ALL CSR' S WITH MEMORY 
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6068 


010376 


0<:0437 


172352 


6069 


010402 


001012 




6070 


010404 


052762 


000001 


6071 


010412 


105262 


002666 


6072 


010416 








010416 


012737 


177777 


6073 


010424 


000137 


010116 


6074 








6075 








6076 








6077 


010430 


104503 




6076 


010432 


005737 


002564 


6079 


010456 


001021 




6060 


010440 


062702 


000004 


6061 


010444 


f\M. 1^ 

062797 


001000 


6062 


010452 


013737 


172950 


6063 


010460 


022797 


4 77/\i\A 

177000 


6064 


010466 


001009 




6065 


010470 








010470 


C12737 


\ 1 1 1 1 1 


6066 


010476 


000137 


007650 


AAA? 
QUO ' 




VCO (Of 




6066 


010510 


101402 




6069 


010512 


000137 


007650 


6090 


010516 


062700 


000002 


6091 


010522 


000240 




6092 


010524 


104423 




6093 


010526 


000137 


007550 


6094 








6095 


010532 


062706 


000004 


6096 


010536 


000137 


010430 



26<: 

002664 35 < : 
002450 



6li 



172350 
172352 
172350 



002564 
172350 701 : 

191: 
ioOl; 



CMP R4.KIPAR5 

BNE 6 1 

BIS «BITO.C0NFIG(R2) 

INCB C0NFIG*2(R2) 

SET CONFGERROR 

JMP 251 
;* 

t*END OF BANK ROUTINE 



CLRICSR 
TST 
BNE 
ADO 
ADO 
MOV 
CMP 
BNE 
SET 

JMP 

CMP 

BLOS 

JMP 

ADD 

NOP 

CACHON 
JMP 

ADD 
JMP 



ENOFLG 

701 

♦4.R2 

«1000,KIPAR4 
KIPAR4.KIPARS 
«177000.KIPAR4 
701 

ENDFLG 
451 

LASTBL0CK,KIPAR4 

191 

451 

•2.R0 



II 

•4,SP 
61 



I DOES IT EQUAL K-'PARS? 

; BRANCH IF FALSE 

iSET BANK ERROW FLAG 

I INCREMENT BANK ERROR COIMTER 

: PRINT CONFIG TABLE 

MCV • X. CONFGERROR 
I YES - MARK INFO IN CONFIG TABLE 



i CLEAR THE CSR UNDER TEST 

(ARE UE AT TOP OF MEMORY? 

J IF SO THEN EXIT 

t UPDATE CONFIGURATION POINTER 

s UPDATE KIPAR4 TO NEXT BANK 

:AND UPDATE KIPAR4 

(ARE UE AT BANK 177 

: BRANCH IF NOT 

tUERE AT LAST BANK 

MOV ENOFLG 

!hAVE UE DONE THE UHOLE MEMORY SPACE? 

: BRANCH IF DONE |R-C 

:JUMP IF NOT DONE 

INCREMENT CSR POINTER 

s DEBUG AID 

:TURN ON THE CACHE 

;JUMP TO TRY NEXT CSR 

:RESTORE STACK tR-C 
:G0 TO END OF BANK ROUTINE sR-C 



CVflJABO fISVll-J ncnORY 0IA6. 
HATCH ALL CS«'S WITH MEMORY 

609S 010542 104423 

6099 010544 104472 

6100 010546 
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SEQ 0137 



6101 
6102 
6103 
6104 
6105 
6106 
6107 
6106 
6109 
6110 
6111 



6112 
6113 
6114 
6115 
6116 
6117 
6116 
6119 
6120 
6121 



010546 000004 



010550 
010554 
010562 
010566 
010574 
010574 

010602 
010604 
010610 
010612 
010614 
010616 

010620 
010624 
010626 
010626 
010632 



6122 010634 

6123 010640 

6124 010642 

6125 010650 
010650 
010654 

6126 010656 

6127 010664 
010664 
010672 
010700 
010702 
010706 



6126 



005037 
012737 
005037 
012737 



005000 
012701 
104424 
005720 
077102 
104423 

005737 
001403 

005237 
104003 

00573- 
001401 
162737 

005237 
104004 

053737 

012737 
022737 
001002 
005037 



SUBAAS: CACHON iMAKE SURE THE CACHE IS ON 

ECCINIT (TRAP ON DOUBLE BIT ERRORS (NORfML) 

NEUTST <<TEST BANK 0 ACCES%S>> 



J •TEST 2 



TEST BANK 0 ACCESSES 



TST2: 



002072 
000001 
002070 
OOOOCl 



012737 033736 



002076 
002100 
000004 



040000 



It: 



SCOPE 

(THIS DOES A "TST" INSTRUCTION ON EVERY LOCATION IN BANK 40 TO SEE 

•IF IT GETS ANY PARITY TP'^S 

i SINCE EVERY LOCATION IS tITHER LOADED OR WRITTEN INTO BY THE PROGRAM 
5 PRIOR TO THIS POINT - THEN A PARITY ERROR IMPLIES THAT THERE IS A 
{HARDWARE FAILURE IN THE MEMORY. 

_ ._ (.Qy^jgp ^ FATAL ACTION IS TAKEN 

: CLEAR PARITY ERROR COUNTER 
J SET THE NO PARITY ERROR FLAG 
I CLEAR NON-EXISTANT MEMORY ERROR COUNTER 
J SET THE NON-EXISTANT MEMORY ERROR MODE TO COUNT 
: TRAPS TO 4 GOTO NONEXIST 



i THESE 
CLR 
MOV 
CLR 
MOV 
SET4 
MOV 
.DSABL 
CLR 
MOV 

CACHOFF 
TST 



ERRORS ARE 
PARCNT 
*1.N0PAR 
NEMCNT 
«1.N0NEM 
«NONEXIST 
«N0NEXIST,4 
CRF 
RO 

«SIZE.R1 
(RO)* 



.TURN CACHE OFF 
:SEE IF I CAN 00 



A READ ACCESS WITHOUT A PARITY TRAP 









SOB 


Rl.lt 










CACHON 


2 TURN CACHE ON 








tSEE IF 


ANY FAILURES 




002072 






TST 


PARCNT 


(ANY PARITY ERRORS? 






BEQ 


2« 


(NO - SKIP 








FATAL 


3 




002064 






INC 


FATAL t 


iSET FATAL INDICATOR 








ERROR 


• 3 










.DSABL 


CRF 




002070 




21: 


TST 


NFf^NT 


lANY NON-EXISTANT MEMORY (HOLES)? 






BEQ 


3* 


iSKIP IF EQUAL 


000002 


002034 




SUB 


#2. ADDRESS 


(UPDATE 1ST ADDRESS FAILURE FROM AUTO 




FATAL 


4 




002064 






INC 


FATAL* 


(SET FATAL INDICATOR 






ERROR 


♦4 










.DSABL 


CRF 




002106 


002664 


31: 


BIS 


CPUBIT. CONFIG 


(SET CORRECT ACCESSED BIT ON BANK 0 






RES4 




(RESET TRAPS TO 4 TO DEFAULT 


034002 


000004 




MOV 


♦TIMEOUT, 4 




000005 


004064 




CMP 


♦5.PR0TYP 


(IS THIS AN 11/83/84 ? 








BNE 


101 1 


(BRANCH IF NOT 


177766 






CLR 


CPUERR 


(CLEAR OUT THE CPU ERROR REGISTER BITS 



lOlt: 



.DSABL CRF 



(THAT A EXPECTED TRAP COULD HAVE SET 



CvnjASO nSVll-J nEnORY OIAG. macro Y05.02 nenday 07-0ct-8S 16:57 Pag* 143-1 
ENABLE ECC TOR CORRECT TRAPS 



SEQ 01 se 



6129 010706 



6130 010706 
010706 
010714 
010716 
010722 
010724 

6131 010724 

6132 010726 
010726 
010730 

6133 010730 

6134 010732 
010732 



i*SUBTEST 



SUBTST <<ENABLE ECC FOR CORRECT TRAPS>> 
ENABLE ECC FOR CORRECT TRAPS 



032777 
001003 
005737 
CO 1402 

104506 

000401 

104472 



000001 
002350 



171722 



IF •SUO SET. IN 8SM OR ACTFLAG IS TRUE 

BIT •SU0.8SUR 

BNE L52 
TST ACTFLAG 
BEQ L55 

L52: i i I I I I 

ENAS6E :TRAP ON SINGLE BIT ERRORS 

ELSE 

BR L54 

L53: i i I > : I 

ECCINIT sTRAP ON DOUBLE BIT ERRORS (NORttAl.) 

END I OF IF «SU0 

L54: : : : : : i 



cvnjAeo nsvii-j MEnonr oiag. 

ENABLE ECC FOR CORRECT TRAPS 
6157 010732 



HACRO rOS.OZ Monday 07-0ct-85 16:57 Pag* 145 



SEQ 0139 



NEWST <<TEST BANKS 1-200 (OCTAL) FOR ZEROS £ ONES>> 



6138 
6139 
6140 
6141 
6142 
6143 
6144 
6145 
6146 
6147 
6146 



010732 000004 



6149 
6150 
6151 
6152 
615S 
6154 
6155 
6156 
6157 
6156 
6159 
6160 
6161 



6162 
6163 
6164 
6165 
6166 
6167 
6166 
6169 
6170 
6171 



6172 
6173 
6174 
6175 
6176 
6177 
6178 



010734 
010740 
010746 
010754 
010754 

010762 
010770 
010776 
011002 
011010 
011012 
011016 
011020 
011022 
011026 
011032 
011036 
011042 
011042 
011044 
011050 

011054 

011056 
011062 
011064 
011072 
011076 
011100 
011104 
011106 
011110 
011112 
011112 

011120 
011124 
011126 
011130 
011132 
011134 
011140 
011140 
011146 



005037 
012737 
012737 

012737 

0127i7 
C12737 
005237 
023737 
103451 
013701 
006301 
006301 
010137 
005037 
005037 
005037 

010346 
013703 
004737 

012603 
105761 
100542 
012777 
012700 
010004 
012701 
010103 
005002 
104424 

053737 

004737 
104417 
104423 

000240 
000416 
005037 

012737 
022737 



:«TEST 3 



TEST BANKS 1-200 (OCTAL) FOR ZEROS £ ONES 



TST3: SCOPE 

I EACH BANK IS TESTED FOR EXISTANCE AND IF IT EXISTS 
I THEN IT IS TESTED FOR ZEROS fi ONES. 
; EXCEPT - 

I PROTECTED BANKS (UHERE THE PROGRAM IS) ARE ONLY TESTED Br 

, "TST" INSTRUCTIONS LIKE BANK ♦© 

tANY BAD BANKS ARE LOGGED IN THE CONFIGURATION TABLE. 
iTHIS ROUTINE IS ONLY DOING A SMART SIZE - NOT ACTUAL TESTING! 



002102 






CLR 


BANK 




000001 

www A 


002076 




MOV 


*1 .NOPAR 


;SET NO PARITY ERROR FLAG 


000002 


002100 




MOV 


*2 , NONEM 


iSET NON-EXISTANT MEMORY MODE TO EXIT TEST LOOP 




SET4 


«NONEXIST 


i TRAPS TO 4 GOTO NONEXIST 


033736 


000004 




MOV 


«N0NEXIST.4 










. OSABL 


CRF 




011506 


002522 




MOV 


M1TST3«4,LINK1 


:SET UP LINKS 


011510 


002524 




MOV 


•nTST3*6.LINK2 




002102 




TAG9t : 


INC 


BANK 




002556 


002102 




CMP 


LASTBANK.BANK 


tDONE? 








BLO 


TAG2t 


(YES - SKIP TO NEXT TEST 


002102 






MOV 


BANK.Rl 










ASL 


Rl 










ASL 


Rl 


]BANK * 4 


002104 






MOV 


Rl.BANKINDEX 




002074 






CLR 


PATERR 


s CLEAR PATTERN ERROR COUNTER 


002072 






CLR 


PARCNT 


{CLEAR PARITY ERROR COUNTER 


002070 






CLR 


NEMCNT 


: CLEAR NON-EXISTANT MEMORY COUNTER (HOLES) 






MAP 


BANK 


:MAP SUPERVISOR SPACE (TEST AREA) TO BANK 












MOV R3.-(SP) 


002102 






MOV 


BANK.R3 




035604 






CALL 


MAPPER 










.DSABL 


CRF 














MOV (SP)*.R3 


002664 






TSTB 


CONFIG(Rl) 


;IS THIS BANK PROTECTED? 






BMI 


TSTBANK 


:YES - GO TEST BANK SPECIAL 


000207 


171430 


UARNl : 


MOV 


«207.8LINK1 


]PUT "RETURN" INSTRUCTION AFTER WRITE ROUTINE 


060000 






MOV 


♦FIRST. RO 










MOV 


R0.R4 




040000 






MOV 


•SIZE.Rl 










MOV 


R1.R3 










CLR 


R2 


sDATA IS ZEROS 








CACHOFF 




iTURN CACHE OFF 








TESTAREA 


i ENTER SUPERVISOR MODE 


002552 


177776 




BIS 


TESTMODE.PSU 


sGO TO SYSTEM TEST MODE 




.DSABL 


CRF 




011502 






CALL 


MTST3 








2t: 


KERNEL 




i ENTER KERNEL MODE 






CACHON 




sTURN CACHE ON 








NOP 












BR 


TAG3I 


:SKIP NEXT INSTRUCTION 


002102 




TAG2t : 


CLR 


BANK 








RES4 




; RESET TRAPS TO 4 TO DEFAULT 


034002 


000004 




MOV 


•TIMEOUT, 4 




000005 


004064 




CMP 


•5,PR0TYP 


lis THIS AN 11/63/64 ? 



CV1JAB0 nSVll-J nEnORY OIAG. tlACRO Y05.02 nonday 07-0ct-85 16:57 
TS TEST BANKS 1-200 (OCTAL) FOR ZEROS £ ONES 





mil S4 

MIX 










BNE 


1011 




mil S6 


00^017 


177766 






CLR 


CPUERR 












101 < ; 


















. DSABL 


CRF 




nil 169 




OO2076 






CLR 


NOPAR 




0\ 1 166 










BR 


SUBAAI 


61 Al 


oi 1 i7o 


005737 


002070 




TAGS* : 


TST 


NEMCNT 


61A2 


Oil 174 


001401 








BEQ 


1< 




011176 


000677 








BR 


TAG9» 


61M 


011200 


104424 






1$ : 


CACHOFF 






011202 

V A Aft 










TESTAREA 


011202 


053737 


002552 


177776 




BIS 


TESTMODE.PSU 












.OSABL 


CRF 




011210 


004777 


171310 






CALL 


aLINK2 


61S7 


011214 


104417 








KERNEL 




6iSS 

w * w 


011216 


104423 








CACHON 




6109 


011220 


000240 








NOP 




6190 


011222 


005737 


002074 






TST 


PATERR 


6191 


011226 


C010S2 








BNE 


2» 


6192 


011230 


005737 


002072 






TST 


PARCNT 


6193 


011234 


001027 








BNE 


21 


6194 


011236 


005737 


002070 






TST 


NEMCNT 


619S 


011242 


001024 








BNE 


21 


6146 


011244 


012700 


060000 






MOV 


♦FIRST. RO 


6197 


011250 


010004 








MOV 


R0.R4 


6196 


011252 


012701 


040000 






MOV 


•SIZE.Rl 


6199 


011256 


010103 








MOV 


R1.R3 


6200 


011260 


013702 


002614 






MOV 


0NES,R2 


6201 


011264 


012777 


000240 


171230 




MOV 


«000240. SLINK 1 


6202 


011272 


104424 








CACHOFF 




6203 


011274 










TESTAREA 


011274 


C53737 


002552 


177776 




BIS 


TESTMODE.PSU 












.DSABL 


CRF 


6204 


011302 


004737 


011502 






CALL 


MTST3 


6205 


011306 


10441** 








KERNEL 




6206 


011310 


104425 








CACHON 




6207 


011312 


000240 








NOP 


bankinoex.ro 


6208 


011314 


013700 


002104 




21: 


MOV 


6209 


011320 


005737 


002074 






TST 


PATERR 


6210 


011324 


001006 








BNE 


31 


6211 


011326 


005737 


002072 






TST 


PARCNT 


6212 


011332 


001003 








BNE 


31 


6213 


011334 


005737 


002070 






TST 


NEMCNT 


6214 


011340 


001406 








BEQ 


41 


6215 


011342 


052760 


000001 


002664 


3*: 


BIS 


♦BITO.CONFIGCRO 


6216 


011350 










SET 


CONFGERROR 




011350 


012737 


177777 


002450 






CPUBIT.CONFIG(R( 


6217 


01 1356 


053760 


002106 


002664 


41: 


BIS 


621S 


011364 


000137 


010776 






JMP 


TAG9I 


6219 
6220 












J TEST A 


PROTECTED BANK 


6221 


011370 








TSTBANK:PUSH 


Rl 




011370 


010146 












6222 


011372 


012737 


000001 


002100 




MOV 


♦l.NONEM 


6223 


011400 


012700 


060000 






MOV 


«FIRST.RO 


6224 


011404 


012701 


020000 






MOV 


#20000. Rl 



P*«« 145-1 



: BRANCH JF NOT 

i CLEAR OUT THE CPU ERROR REGISTER BITS 
sTHAT A EXPECTED TRAP COULD HAVE SET 

J INDICATE DEFAULT PARITY ACTION 

(ANY TRAPS? 

{NO - SKIP 

iNOU - TRY NEXT BANK 
iTURN CACHE OFF 
(ENTER SUPERVISOR MODE 

J GO TO SYSTEM TEST MODE 

jFINISH PATTERN 

t ENTER KERNEL MODE 

:TURN CACHE ON 

s DEBUG AID 

(ANY PATTERN ERRORS 

I YES - SKIP 

:ANY PARITY ERRORS 

J YES - SKIP 

sANY NON EXISTANT MEMORY 
iYES SKIP 



iDATA IS ONES 

{PUT "NOP" INSTRUCTION BACK IN SUBROUTINE 
sTURN CACHE OFF 
s ENTER TEST MODE 

iGO TO SYSTEM TEST MODE 

sDO IN MEMORY IF NOT 
i ENTER KERNEL MODE 
tTURN CACHE ON 
: DEBUG AID 

:ANY PATTERN ERRORS? 

;YES - SKIP 

:ANY PARITY ERRORS? 

J YES - SKIP 

;ANY HOLES? 

:NONE - SKIP 

tSET ERROR BIT IN THIS BANK 

; FORCE PRINTING OF CONFIGURATION TABLE 

MOV • 1. CONFGERROR 

sSET ACCESSED BIT 



MOV Rl. (SP) 
I SET NON-EXISTANT MEMORY TO COUNT 



SEQ 0140 



CvnjABO nSVll-J HEnORY OIAG. macro YOS.02 Monday 07-0ct-85 16:57 
TS TEST BANKS 1-200 (OCTAL) FOR ZEROS £ C«S 



6225 011410 

6226 011412 
011412 



6227 
6228 
6229 
62S0 
6231 
6232 

6233 



6234 
623S 

6236 

6237 



6238 
6239 

6240 
6241 
6242 
6243 
6244 
624S 
6246 
6247 
6248 
6249 



011420 
011422 
011424 
011426 
011430 
011436 
011436 
011440 
011440 
011444 
011446 
011454 
011454 
011462 
011462 
011462 
011462 
011466 
011470 
011476 
011476 
011476 
011502 
011504 
011506 
011510 
011512 
011514 
011516 
011522 
011524 



104424 

053737 002552 177776 

005720 4«: 

077102 

104417 

104423 

012737 000002 002100 
012601 

005737 002072 
001406 

052761 000001 002664 
012737 177777 002450 



005737 002070 
001003 

053761 002106 002664 



000137 010776 

010220 nTST3: 

077102 

000240 

012401 2«: 

020102 

001402 

005237 002074 

077306 3(: 

000207 



CACHOPF 
TESTAREA 

BIS TESTnOOE.PSU 
.OSABL CRF 

(RO)* 
R1.4I 



TST 

soe 

KERNEL 
CACHON 
MOV 
POP 



«2.N0N£M 
Rl 



IF PARCNT NE *0 

BIS «BIT0.C0NFIG(R1) 
SET CONFGERROR 

END J OF IF PARCNT 

IF NEMCNT EQ *0 



BIS CPUBIT.CONFIG(Rl) 
ENO J OF IF NEMCNT 



JMP 
MOV 
SOB 
NOP 
MOV 
CMP 
BEQ 
INC 
SOB 

RETURN 



TAG9$ 

R2.(R0)* 

R1.MTST3 

(R4)».R1 

R1.R2 

31 

PATERR 
R3.2( 



SEQ 0141 



jTURN CACHE OFF 
: ENTER TEST MODE 

iGO TO SYSTEM TEST MODE 



{ENTER KERNEL MODE 
(TURN CACHE ON 

jRESET NON-EXISTANT MEMORY TO EXIT TEST LOOP 

MOV (SP)».R1 

TST PARCNT 
BEQ L55 

i ERROR BANK 

MOV «-l. CONFGERROR 

LSS: i i i i i i 

TST NEMCNT 
BNE L56 

{ACCESSED BANK 

L56 : s i i s I i 

(WRITE MEMORY TO PATTERN 
iDO TILL DONE 

;THIS IS EITHER A NOP OR RETURN 

I READ DATA 

I DOES IT MATCH ? 

I IF NOT COUNT ERRORS 
iANY UAY 00 ALL MEMORY 
iDONE RETURN 



CvnjAeO nsvil-J rcnOftr OXMS. NACM Y05.02 Nenday 07 -Oct -as 16:57 P«g« 146 
TS TEST BANKS 1-200 (OCTAL ) FOR ZEMS C ONES 



sea 0142 



6251 


011S26 






62S2 








6255 








6254 








6255 011526 




009109 










6257 


011536 


V A ^ ■ w 


009104 


6256 


011542 








011542 




0091 1& 




011546 








011550 


005737 


002136 




011554 


001411 




6259 


011556 


ws ■ ws 




6260 


011562 


062737 


000020 


6261 


011570 


052760 


000200 


6262 


011576 








011576 


C00402 






011600 






626S 


011600 


005237 


002102 


6264 


011604 








011604 






6265 


011604 


023737 


002556 


6266 


011612 


002347 





SUBAAI: SUBTST <<FINO SHAOOU INHIBIT nOOE POINTERS >> 
•SUBTEST FIND SHAOOU INHIBIT NODE POINTERS 



002102 
002664 



002102 



* THIS SECTION LOOKS FOR INTERLEAVED NSVll-J NEnORIES AND FIGURES OUT 

* WHERE THE SHAOOU INHIBIT NODE POINTERS ARE LKATEO. THESE AREAS 

* ARE THEN NARKED AS PROGRAH SPACE. 

CLR BANK I RESET BANK TO ZERO 

SHAOLl: CALL EXBANK iSET BANK PARAMETERS 

NOV bankindex.ro 

IF ACFLAG IS TRUE AND INTFLAG IS TRUE 

TST ACFLi^C 
BEQ L5/ 
TST INTFLAG 
BEQ L57 

I POINT TO BANKINOEX • 6 
{POINT TO BANK • 16 
iNAKE new bank PROGRAM SPACE 



AOO 
AOO 
BIS 
ELSE 



•40. R2 
♦20.BANK 

i8IT7.C0NFIG(R0) 



INC BANK 

ENOt OF IF ACFLAG 

CriP LASTBANK.BANK 
BGE SHAOLl 



BR L60 

LS7: t i I k 1 1 

I GO TO NEXT BANK 

L60: t t i i I i 
sHAVE UE DONE ALL THE BANKS? 
: BRANCH IF NOT 



CVflJABO nsvil-J MEnOAY OIAC. riACRO Y05.02 
FIND SHADOW INHIBIT H00€ POINTERS 



6269 011614 
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NEUTST <<ECC INHIBIT nOOE POINTER TEST>> 



SCB 0143 



I •TEST 4 



ECC INHIBIT NODE POINTER TEST 



6270 
6271 
6272 
627S 
6274 
6275 
6276 
6277 
627S 
6279 
6280 
6281 
6282 
6265 
6284 
6285 
6286 
6287 
6288 
6289 



6290 
6291 
6292 
629S 



6294 

6295 



6298 
6297 



011614 000004 



tSSo 

8301 



8302 
6303 



6304 
8305 



011616 
011620 
011626 
011626 
011*32 
011832 
011838 
011642 
011848 
011848 
011652 
011854 
011854 
011880 
011882 
011882 
011888 
011870 
011874 
011700 
011702 
011708 
011712 
011712 
011720 
011722 
0117S0 
011730 
011734 
011738 
011744 
011744 
011744 
0117SC 
011750 



TST4: SCOPE 

I THE nSVll-J OR HFllS-K INHIBIT ECC 
tON THE BOTTOM FIRST OR SECOND 16K 
lis CONSIDERED TO BE A PROTECTED 
I QUITE COHPLEX TO DETERHINE ON A 
I BANKS CAN BE PROTECTED i 
• SO 

I THIS ROUTINE ATTEHPS TO CREATE A 
I OF EVERY ECC BANK. ECC HARDWARE 
I IN PROTECTED BANKS WHICH SHOULD 
I THE PROGRAH IS. 

t 
> 



104424 

012737 177777 002156 
005037 002102 



012701 
004737 
013700 

005737 
001438 

005737 
001433 

005737 
001030 
012703 
118002 
008302 
042702 
010237 



080000 
037780 
002104 

002118 



002120 



002342 

000002 
002885 

177741 
002152 



001413 
013737 



023737 002152 002156 

002152 002158 
002122 

000100 002664 



005737 
001003 
0S2780 



004737 012038 



DISABLE AND DIAGNOSTIC CHECK HODE 
WORDS CONTROLLED BY A CSR. THIS 
BANK BY THE PROGRATI. IT HAY BE 
GIVEN SYSTEH CONFIGURATION WHICH 



DOUBLE BIT ERROR IN AOORESS 0(2 
WILL PREVENT THIS FROH HAPPENING 
ALWAYS INCLUDE BANK ZERO - WHERE 



iWARNING: •!!!!!!!!! 

I IN CASE OF HARDWARE FAILURE IT IS COMMON THAT A DOUBLE BIT ERROR 

I WILL BE CREATED ON THE KERNEL STACK £ "CRASH- THE DIAGNOSTIC 

•DURING THIS ROUTINE. YOUR ONLY CLUE IS THAT YOU CAN GET AS FAR AS 



I THIS ROUTINE BUT NOT PAST IT! 
CACHOFF 

MOV *-1.0L0CSR 

FOR BANK :- 40 TO LASTBANK 



MOV 8FIRST.R1 
CALL EXBANK 
MOV BANKIN0EX.ro 
IF ACFLAG IS TRUE 



IF MKFLAG IS TRUE 
IF SKIPMK IS FALSE 



MOV 82. R3 

MOVB CONFIG*1(RO).R2 

ASL R2 

BIC •tCS6.R2 

MOV R2.CSRN0 

IF CSRNO NE QLOCSR 



MOV CSRNO. OLOCSR 
IF PFLAG IS FALSE 



BIS «BIT6.C0NFIG(RO) 
END I OF IF PFLAG 

CALL II9TEST 
ENOi V IF CSRNO 



•TURN CACHE OFF 



CLR BANK 
B6 : 1 1 1 i I > 
I SET UP VIRT ADOR POINTER 



TST ACFLAG 
BEQ L61 

TST MKFLAG 
BEB L82 

TST SKIPMK 
BNE L63 
iSET INDEX COUNTER 



CMP CSRNO. XDCSR 
BEQ L84 



TST PFLAC 
BNE L85 



L65 : ( i 1 1 1 1 
L84 : 1 1 1 1 1 1 



cvHjAeo 'i-J «enoRY oiag. macro yos.02 

T4 ECC INHIBIT MODE POINTER TEST 

6308 0117S0 

01X750 
6509 011750 

011750 
6310 011750 

011750 
6S11 011730 

011750 

011754 

011762 

011764 
6312 011764 

011764 

011766 

011772 



005237 002102 

023737 002102 002556 

003723 



6513 
6314 



6315 
6316 



6317 
6318 

63.9 
6320 



011776 
012000 
012004 
012004 
012012 
012014 
012020 
012022 
012022 
012024 
012024 
012026 
012026 
012030 
012030 
012030 
012032 



010346 

012703 000200 
004737 035604 

012603 

005037 002102 

C32777 000001 170624 
001003 

005737 002350 
001402 

104506 

000401 

104472 



104423 

000137 012?i'0 
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END I or IF SKIPflK 

L63: mill 

END I or IF nKFLAG 

L62 : 1 1 1 1 1 1 

END I OF IF ACFLAG 

L61 : 1 1 i i I i 

ENO> OF hOR BANK 

INC BANK 

Cr«> BANK.LASTBANK 
BLE B6 

E6 : I I i 1 1 i i 

MAP sMAP TEST SPACE TO BANK 0 

MOV R3.-(SP) 

nOV •200, R3 
CALL riAPPER 
.DSABL CRF 

flOV (SP)«.R3 

CLR BANK 

IF •SUO SET. IN 8SUR OR ACTFLAG IS TRUE 

BIT •SU0.8SUR 

BNE L66 
TST ACTFLAG 
BEQ L67 
L66: I s ) i i t 

ENAS6E :TRAP ON SINGLE BIT ERRORS 

ELSE 

BR L70 

L67: ] i i I s : 

ECCINIT {TRAP ON DOUBLE BIT ERRORS (NORMAL) 

ENOi OF IF •SUO 

fO: ! ! : J J J 

CACHON :TURN THE CACHE BACK ON 

JMP SUBAAR sJUMP OVER THE SUBROUTINE 



SEC 0144 



cvfijAao 

T4 



6324 
6S2S 
6526 



6S27 

6526 
6S29 

6550 
6551 
6552 
6555 
6554 
6555 
6556 
6557 
6556 
6559 
6540 

6541 
6542 
6545 
6544 
6545 
6546 
6547 

«548 
6549 
6550 
6551 
6552 
6555 
6554 
6555 

6556 
6557 
6556 
6559 
6560 
6561 
6562 
6565 

6564 



nSV'l J MEHORT DIAG. MACRO y05.02 
ECC INHIBIT «00€ POINTER TEST 
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012056 
012040 
012040 
012042 
012046 

012052 
012054 
012056 
012064 
012064 

012072 
012072 
012074 
012076 
012076 
012100 
012102 
012104 
012106 
012110 
012112 
012114 



012116 
012116 
012120 
012126 
012150 
012154 
012156 
012140 
012142 
012142 
012144 
012146 
012154 
012156 
012160 
012162 
012164 
012166 
012166 
012170 
012172 
012200 
012202 
012204 
012206 
012210 
012212 
012212 
012212 
012212 



0OSOO4 
010546 

015705 002102 
00473'' 035604 

012603 
005005 

012757 020000 002150 
055757 002552 177776 



011146 
060501 

011146 
104505 
0.0411 
160501 
010411 
104505 
005711 
104501 



103435 

012737 020000 002150 
104505 

013711 002614 
104505 
005711 
104501 

1PS423 
104513 

012737 025140 002150 

104505 

010411 

104505 

005711 

104501 

105411 
104515 

012757 025604 002150 

104505 

010411 

104505 

005711 

104501 



IMPTEST.CLR R4 
MAP BANK 



tlOV 

CALL 

.OSABL 



8ANK.R3 

tIAPPER 

CRF 



SEQ 0145 



,nAP SUPERVISOR SPACE (TEST AREA) TO BANK 
MOV Rl.-(SP) 



CLR R5 

MOV •eiTlS.CSR 

TESTAREA 

BIS TESTMOOE.PSU 
.DSA6L CRf 
PUSH (Rl) 



ADD 

PUSH 

CHKIOIS 
MOV 

sue 

MOV 

CLRICSR 
TST 

UASIOBE 



R5.R1 
(Rl) 



R4,(R1) 

R3.R1 

R4.(R1) 



MOV (SP)..R3 



;ENTER TEST MODE 

;G0 TO SYSTEM TEST MODE 

:SAVE TEST LOCATION 

MOV (Rl). (SP) 

:INDEX TO NEXT LOCATION 
iSAVE TEST LOCMTION 

MOV (Rl), (SP) 
:OISABLE ECC £ WRITE CHECKBITS FOR 1 CSR 
;URITE CHECKBITS (ALL ZEROS) 



(Rl) 

:THIS MAKES SURE THAT SBE ' S DON'T LOOK LIKE PROTECTED AREAS 



CLEAR CSR 

READ CHECKBITS INTO REAL CSR 
UAS THERE A DOUBLE BIT ERROR 



ON.NOERROR :1 

MOV •6IT13.CSR 
CHKIDIS 

MOV 0N£S.(R1) 
CLRICSR 
TST (Rl) 
UASIDBE 
ON.NOERROR :2 

C8REG 

MOV ♦2il4C.CSR 

CHKIOIS 

MOV R4.(R1) 

CLRICSR 

TST (Rl) 

UASIOBE 

ON.NOERROR i5 

CBREG 

MOV «2 5604. CSR 

CHKIDIS 

MOV R4.(R1) 
CLRICSR 
TST (Rl) 
UASIOBE 
END iOF ON.NOERROR :3 

END tOf ON.NOERROR -.2 



BCS L71 

:DISABLE ECC C WRITE CHECKBITS FOR 1 CSR 
i CLEAR CSR 

iUAS THERE A DOUBLE BIT ERROR 
BCS L72 

ENABLE CHECK /SYNDROME BIT REGISTER 
URITE OBE'S IN CSR 

DISABLE ECC L URITE CHECKBITS FOR 1 CSR 
i CLEAR CSR 

iUAS THERE A DOUBLE BIT ERROR 
BCS L75 

ENABLE CHECK /SYNDROME BIT REGIS lER 
URITE DBE'S IN CSR 

DISABLE ECC L URITE CHECKBITS FOR 1 CSR 
i CLEAR CSR 

iUAS THERE A DOUBLE BIT ERROR 

L75: 1 1 i i i > 
L72: i s i t i : 



CvnjAeo nsvil-J MEnORY 01 ag. hacrO yoS.02 
T4 ECC INHIBIT HOOC POINTER TEST 



6566 

6567 
6568 

6569 
6570 
6571 
6572 
6575 
6574 
6575 
6576 
6577 
6576 
6579 

6560 
6561 

6582 
6585 
6584 
658S 



C12212 
012212 
012212 
012212 
012214 
012216 
012216 
012216 
012220 
012222 
012224 
012226 
012250 
012252 
012254 
012240 
012244 
012246 
012246 
012250 
012252 
C12252 
012254 
012^56 

012260 
012260 



105001 
0052C5 



104471 
010411 
060501 
010411 
104505 
005705 
001405 

050560 002664 
105260 002666 
104056 

012611 
160501 

012611 
104417 

000207 



012757 177777 002420 
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END :0F ON.NOERROR :1 

ON. ERROR 

INC RS 
END Tor ON. ERROR 



SEQ 0146 



II: 



ECCIDIS 
nov 
ADD 
NOV 

CLRICSR 

TST 

BEQ 

BIS 

INCB 

ERROR 

POP 

SUB 
POP 

KERNEL 
RETURN 



SUBAAR: SET 



R4.(R1) 

R3.R1 

R4.(R1) 

R5 
II 

RS.CONFIG(RO) 

C0NFIG*2(R0) 

*36 

(Rl) 

R5.R1 
(Rl) 



STOP OK 



L71 : 1 1 i i i ( 

BCC L74 
sIOENTiry AS BAD BANK 

L74 : I I I i i i 
lOISABLE ERROR CORRECTTQN 
CLEAR OUT DOUBLE BIT ERROR* 
INDEX TO SECOND WORD 
CLEAR OUT DOUBLE BIT ERROR! 



sRESTORE TEST LOCATION (2N0 WORD) 

nOV (SP)*.(R1) 

iGO BACK TO FIRST WORD 

sRESTORE TEST LOCATION (1ST WORD) 

MOV (SP)..(R1) 



: PROGRAM CAN NOW BE HALTED 



MOV t-LSTOPOK 
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SCQ 0147 



6SS6 


012266 






6569 


01 22M 


A1 97AA 

Ol£ rUU 


AAAA3A 


6990 


012272 


A1 07A1 

Olc r Ol 


00c4OC 


6591 


0122 ro 


OU^21 




6592 


0129V0 


A'TT AAO 

Of rOOc 




6595 


012902 








012902 


AAKAV7 
00903 r 


AA91 AO 
OOclOc 




A4 ^•^^ 






0594 


012900 


U04 f 3 » 


AX77JLA 

V J f »oo 


6593 


012912 


At V7AA 
Old rOO 


AA91 AA 
00cl04 


6596 








659 J 


A4 ^ 

012910 








012310 


AA^7X7 


Wcl lO 




A1 


AA1 AAA 






A1 


llOvUd 






A1 


AA37AV 


1 777IIA 


64 OO 


At 

012934 


AAAVA'V 






W12AAO 


AA^3ILV 




D4Wc 


W12942 








U129*C 


VU9 * 9 ' 


WClS V 






vUl^dc 




D4Ud 










A| 3CKA 








A| 3X^A 


















AA^7X7 


WC 1 w V 






VUl^Cw 






A| 


1 lOVUw 


WCww J 


t 


Ut290c 


A1 AXAA 




D4UO 






1 777l*0 




U12w r U 


A73A07 


1 77774 








1 777<iO 




A« 








A| 3AAn 


A^AVAA 






A| 


AA1 AA7 




Ic 


A| SAAA 


AA37&A 


A « A AAA 
Vl^VW 






A497lkA 


X r WW 


1^ 
















o*l J 
















iLA 1 
o4 lo 












WW^Wl 






n 1 3A 
















012424 


000403 




6416 


012426 








012426 






6419 


012426 








012426 


012737 


177777 


6420 


012434 








012434 






6421 


012434 








012434 







SUBTST <<LEGAL COfriCURATION CHECK >> 
!*SUBTEST LEGAL CONFIGURATION CHECK 



1«! 



002666 
002664 



002450 



nov •U-.RO 
MOV KSRINFO.Rl 
CLR vRD* 
SOB RO.ll 

FOR BANK :- *0 TO LASTBANK 



CALL EXBANK 
nov BANKINDEX.RO 

IF ACFLAG IS TRUE 



MOVB CONFIG •1(R0).R3 

BIC •tC17.R3 

ASL R3 

INC CSRINF0(R3) 

IF MKFLAG IS TRUE 



CLR BANK 

B7: 1 1 1 1 1 1 



TST ACFLAG 
BEQ L75 



{MAKE SURE THAT EACH BANK HAS NO MORE THAN 2 CSRS 
BEGIN LEGALCSR 



TST MKFLAG 
BEQ L76 



BIO: 



IF INTFLAG IS TRUE 

MOVB C0NFIG*l(RO).R3 

nov R3.R4 

BIC •tC17.R3 

ASH •-1.R4 

BIC ♦tC17.R4 

IF R3 EQ R4 



BIC *BIT11!BIT12.C0NFIG*2(R0) 
BIC *1 70000. CONFIG(RO) 

LEAVE LEGALCSR 



TST INTFLAG 
BEQ L77 



CMP R3,R4 
BNE LlOO 



ENDi 
ELSE 



OF IF R3 



LEAVE LEGALCSR 
ENOs OF IF INTFLAG 
SET CONFGERROR 
ENO LEGALCSR 
END ;0F IF MKFLAG 



BR ElO 

LlOO: I ! I i I : 

BR LlOl 
L77: ; 1 1 1 i I 

BR ElO 
LlOl: i ; 1 1 1 i 

MOV •-1. CONFGERROR 
ElO: i 1 1 1 i I 
L76: I i I i I t 



CVnjAeo nsvil-J nEIKWY OIAG. 
LCCAt CONFIGURATION CHECK 



6422 
6423 

6424 



6425 
6426 
6427 
6428 
6429 
6450 
6431 
6432 
6433 
6454 
6435 
6456 
6457 
6455 
6459 
6440 
6441 
6442 
6445 
6444 
6445 
6446 
6447 
644S 
6449 
6450 
6451 
6452 
6455 
6454 
6455 
6456 



64S7 
6456 
6459 
6460 
6461 
6462 
6463 
6464 
6465 
6466 
6467 
6466 
6469 



012454 
012434 
012434 
012434 
012440 
012446 
012450 
012450 
012450 
012452 
012454 
012456 
012460 
012462 
012466 
012474 
012476 
012504 
012506 
012512 
012514 
012520 
012524 
012526 
012532 
012556 
012540 
012542 
012550 
012552 
012560 
012564 
012570 
012572 
012576 
012600 
012604 
012606 
012612 
012616 
012622 
012624 
012624 
012626 
012630 
012634 
012640 
012646 
012650 
012654 
012656 
012660 
012662 
012666 
012670 
012672 
012674 
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END iOF IF ACLAG 



SEQ 0148 











END: 


OF FOR BANK 


005237 


002102 










025757 


002102 


002556 








003717 




















PUSH 


R5.R0 


010546 












01C046 












005000 








CLR 


RO 


005001 








CLR 


Rl 


005005 








CLR 


RS 


005057 


012670 






CLR 


MBERR 


022761 


000177 


002462 


2>: 


CMP 


♦177.CSRINF0(R1) 


002045 








BCE 


5* 


022761 


000010 


002462 




CMP 


«10.CSRINF0(R1) 


002003 








BGE 


SI 


004737 


013012 






CALL 


ILLCSR 


C00434 








BR 


51 


016005 


002664 




3t: 


MOV 


C0NFIG(R0).R5 


052705 


000002 






BIT 


«BIT1.R5 


001415 








BEQ 


41 


042705 


170377 






BIC 


♦tC7400.R5 


072527 


177771 






ASH 


♦-7.R5 


020501 








CMP 


R5.R1 


001007 








BNE 


41 


052760 


010000 


002666 




BIT 


«6I T 12. CONFIG *2(R0) 


001005 








BNE 


4t 


012737 


000001 


012670 




MOV 


«1. MBERR 


062700 


000004 




4*: 


ADD 


«4.R0 


022700 


000340 






CMP 


«340.R0 


001351 








BNE 


5t 


005737 


012670 






TST 


MBERR 


001402 








BEQ 


5» 


004737 


013012 






CALL 


ILLCSR 


005000 






St: 


CLR 


RO 


005057 


012670 






CLR 


MBERR 


062701 


000002 






ADD 


«2.R1 


022701 


000040 






CMP 


«40.R1 


001321 








BNE 


2t 










POP 


R0.R5 



012600 
012605 
005037 
012700 
032760 
001005 
162700 
000771 
006200 
006200 
010037 
000402 
000000 
000000 
005000 



012670 
000774 
000002 

000004 



002556 



002664 6t : 



7»! 



MBERR: 
PHEBE: 
SKUJ: 



CLR 

MOV 

BIT 

BNE 

SUB 

BR 

ASR 

ASR 

MOV 

BR 

.UORO 
.WORD 
CLR 



MBERR 
•774. RO 

«BIT1,C0NFIG(R0) 
71 

«4,R0 
61 

RO 
RO 

RO.LASTBANK 

SKUJ 



RO 



L75 : 1 1 i ; ) : 

INC BANK 

CMP BANK.LASTBANK 
BLE B7 

E7 : s i : s 1 i i 
J SAVE CONTENTS OF R5. RO 

MOV R5.-(SP) 
MOV RO.-(SP) 

i CLEAR REGISTERS 



t CLEAR ERROR INDICATOR 
»IS CURRENT CSR <- 177 
{BRANCH IF SO 
>IS CURRENT CSR < 10 
(BRANCH IF SO 
:CALL ERROR ROUTINE 
,TRy NEXT CSR 
MOVE LOU UORD TO R5 
DOES MEMORY EXIST HERE? 
BRANCH IF NOT 
ISOLATE CSR NUMBER IN 
REGISTER 5 

jIS IT THE CURRENT CSR? 
TRY NEXT UORD OF CONFIG IF NOT 
IS IT INTERLEAVED? 
BRANCH IF SO 
SET ERROR INDICATOR 
UPDATE CONFIG COUNTER 
CONFIG TABLE ALL DONE? 
BRANCH IF NOT 
ERRORS FOUND? 
TRY NEXT CSR IF NOT 
CALL ERROR ROUTINE 
REINITIALIZE CONFIG COUNTER 
CLEAR ERROR INDICATOR 
UPDATE CSR COUNTER 
ALL CSR'S DONE? 
BRANCH IF NOT 
RESTORE REGISTERS 

MOV CSP)*.RO 
MOV (SP)».R5 
i RESET ERROR INDICATOR 
INDEX TO TOP OF CONFIG TABLE sR-C 
MEMORY PRESENT? iR-C 
BRANCH IF SO :R-C 
(TRY NEXT LOUER ENTRY IN CONFIG TABLE |R-C 

sR-C 
,R-C 

iOIVIOE INDEX BY 4 TO GET BANK »,R-C 
: STORE IN LASTBANK jR-C 

tSAVE SPACE FOR ERROR INDICATOR 

:SAVE SPACE FOR ODD BOUNDARY INTERLEAVED INDICATOR 
: CLEAR CONFIG COUNTER 



CVhjABO hsvii-j nErtonr oiAC. 

LEGAL CONPICUSATION CHECK 
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SEQ 0149 



6470 
6471 
6472 
6475 
6474 
6475 
6476 
6477 
6478 
6479 
6480 
6481 
6482 
6483 
6484 
6485 
6486 
6487 
6488 
6489 
6490 
6491 
6492 
649S 
6494 
6495 
6496 
6497 



012676 
012702 
012710 
012712 
012720 
012722 
012726 
012752 
012754 
012742 
012744 
0127S2 
012754 
012762 
012764 
012772 
012774 
015000 
015002 
015010 
015012 
015014 
015016 
015022 
015024 
015050 
015054 
015040 
015040 



6498 015044 
013044 

6499 013052 



005037 
032760 
001431 
052760 
0O1005 
005257 
062700 
000765 
025727 
001417 
025727 
001415 
025727 
001407 
025727 
001405 
005057 
000405 
012757 
C00421 
010102 
006202 
022702 
100002 
062702 
062702 
110257 

104401 



012757 
000207 



012672 






llr 


PHEBE 






.n CAD PAiaJTCD 


0OQOQ2 


002664 


If : 


D T T 

Dl T 


•6IT1.C0NFIG(R0) 






. TC TktfTDC MCMADV DDCCCKiT 








DcQ 


31 






DDAU^U TC MAT 

sBHMNLn Xr rfU 1 




AA^£££ 




D TT 
Dl T 


•6IT12.C0NFIG»2(R0) 




. TQ TT TiaTCDl CAWCn? 
I XO X * Xn 1 cnL-CMVCU f 








DkIC 

BNc 


2t 






• DDAiaru TC CA 










PHEBE 






. TiarOCMCMT PAIMTPD 


0Q0004 






ADD 


44. RO 






. TkirDCHCMT TAUCTT TAI MTCD 






Bn 


1) 






. TDV kiCVT DAkU^ 
1 InT ncAl DMrilv 


012672 


AA^\A 4 A 

OOOOlO 


21 : 


cnp 


PHEBE , 4M0 






. TC TUC TAl HdTCD COl lAl TA 






BcQ 


4t 






. AkiC AC TUC CDCCTAl UAl IICC 


012672 


0OOO30 






PHEBE , «50 






. TC TT TC 

S ir 11 XO 1 . . 








DCA 

BcU 


4$ 






.DDAkiru TA At 


012O72 


AAAAQA 




CHr 


PHEBE , #50 














DCA 


4$ 








UlcO f C 


AAAA7A 






PHtBE • v70 
















4$ 








UleO f e 




of : 


PI D 


PHtBE 






: CLEAR INDICATOR 








DD 


51 








AAAAA 1 


A1 


At , 


HAW 

nuv 


A1 DLJCDC 

wl • PntBt 






;SET INDICATOR 






9* : 


DD 


CI ID A AD 


: BRANCH 


TO NEXT SUBTEST 








nuv 


R1,R2 


iR2 HAS 


CSR NUMBER 








ACD 


R2 


aHAKE 


ACCEPTABLE FOR PRINTING 


AAAA1 3 








*10. .R2 














RPL 


1) 








000007 






ADO 


♦7.R2 








000060 




1): 


ADO 


460.R2 








071260 






MOVB 


R2.nSGA122 


iPUT 


NUMBER INTO ERROR MESSAGE 






TYPE 


nSG122 








071244 






TYPEIT 


.MSG122 














.DSABL 


CRF 














SET 


CONFGERROR 








177777 


002450 












MOV 








RETURN 











MOV 0 1 , CONFGERROR 



CVMJA80 MSVll-J r«riORY DIAG. 
LEGAL CONFIGURATION CHECK 



6502 


013054 






6503 


013054 








013054 


005037 


002400 




013060 


005037 


002402 


6504 


013064 


013702 


002556 


6505 


013070 


006302 




6506 


013072 


006302 




6507 


013074 








013074 


005001 






013076 






6508 


013076 








013076 


033761 


002106 




013104 


001411 




6509 


013106 








013106 


032761 


000400 




013114 


001403 




6510 


013116 








013116 


005237 


002402 


6511 


013122 








013122 


000402 






013124 






6512 


013124 








013124 


005237 


002400 


6513 


013130 








013130 






6514 


013130 








OlSlSO 






6515 


OlSlSO 








OlSlSO 


062701 


000004 




013134 


020102 






013136 


003757 






013140 






6516 








6517 


013140 


005037 


002452 


6518 


013144 








01S144 


005001 






013146 






6519 


013146 


006361 


002374 


6520 


013152 


006361 


002374 


6521 


013156 


006361 


002374 


6522 


013162 


006361 


002374 


6523 


013166 


066137 


002374 


6524 


013174 








013174 


062701 


000002 




013200 


020127 


000010 




013204 


003760 






013206 






6525 


013206 








013206 


OOSOOl 






013210 






6526 


o:32io 








013210 


033761 


002106 




013216 


001402 




6527 


013220 
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SUeAAP: SUBTST <<PRINT CONFIGURATION DETAILS>> 



SEQ 



i*SUBTEST 



PRINT CONFIGURATION DETAILS 



002664 
002666 



002452 



002664 



CLEAR LSIZE.nSIZE 



MOV LASTBANK.R2 

ASL R2 

ASL R2 

FOR Rl :- «0 TO R2 BY «4 



IF CPUBIT SET. IN CONFIG(Rl) 
IF «BIT8 SET. IN C0NFIG«2(R1) 
LET MSIZE :- MSIZE * «1 

ELSE 

LET LSIZE :- LSIZE * *1 
END i IF BITS 
ENOj OF IF CPUBIT 
END :0F FOR ALL BANKS IN TABLE 



CLR I 

FOR Rl :- <K) TO «10 BY «2 



ASL BSIZE(Rl) 
ASL BSXZECRl) 
ASL BSIZE(Rl) 
ASL BSIZE(Rl) 
ADD BSIZECRD.I 
END I FOR Rl 



FOR Rl *0 TO #200 BY *4 

IF CPUBIT SET. IN CONFIG(Rl) 
LET UNITOP UNITOP ♦ *l 



CLR LSIZE 
CLR MSIZE 



CLR Rl 
Bll: i 1 1 i 1 1 



BIT CPUeiT.CONFIG(Rl) 
BEQ L102 

BIT •8IT8.C0NFIG*2(R1) 
BEQ L103 



INC MSIZE 

BR L104 

L103: I ! I t I i 

INC LSIZE 

L104: 1 s i I i ; 

L102: 1 1 1 1 i : 

ADO M.Rl 
CMP R1.R2 
BLE Bll 
Ell: I i i i i 1 1 



CLR Rl 
B12: ; 1 1 i i I 



iBSIZE(Rl) :- BSIZE(Rl) * 16. 
si <- I ^ BSIZE(Rl) 

ADO «2.Ri 
CMP Rl,#10 
BLE B12 
E12: mini 

CLR Rl 
BIS: 1 1 1 1 1 1 



BIT CPUBIT. CONFIGCRl) 
BEQ L105 



CVMJABO MSVll-J MCnOHY OIAG. 
PRINT rONTICURATION DETAILS 



6528 
6529 



6530 
6531 
6532 
6533 
6534 



65S5 



6SS6 
6537 
6S3S 
6539 
6540 
6541 



013220 
013224 
013224 
013224 
013224 
013230 
013234 
013236 
013236 
013242 
013246 
013252 
013256 
013256 
013264 
013266 
013274 
013274 
013274 

013300 
013304 
013306 
013314 
013316 
013324 
013324 
013330 



6542 013332 
01SSS2 

6543 013336 

6544 013342 

6545 013344 

6546 013352 

6547 013354 

6548 013362 
013362 
013366 

6549 013370 
013370 



005237 002416 



06270] 
020127 
003765 

006337 
006337 
006337 
006337 

023737 
002003 
013737 



104401 

005737 
001414 
022737 
001003 
162737 

013746 
104405 



104401 

005737 
001414 

022737 
001003 
162737 

013746 
104405 



104401 



000004 

000200 



002416 
002416 
002416 
002416 
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EM); OF IF CPUBIT 
END: OF FOR Rl 



SEQ 0151 



002452 002416 
002416 002452 



ASL UNITOP 
ASL UNITOP 
ASL UNITOP 
ASL UNITOP 
IF I LT UNITOP THEN LET 



INC UNITOP 

LIOS: i t > I i I 

ADO *4.R1 
CMP Rl.#200 
BLE B13 

E13: 1 i i i I > i 



s UNITOP :■ UNITOP * 16. 
I :- UNITOP 



CMP I. UNITOP 
8GE L106 
MOV UNITOP. I 

L1C6: : i : i t J 









TYPE 


♦ CRLF 


002660 






TYPEIT 


. ICRLF 








.DSABL 


CRF 


002400 




21: 


TST 


LSIZE 








BEQ 


31 


004000 


002400 




CMP 


•2048. .LSIZE 








BNE 


121 


000004 


002400 




SUB 


«4. LSIZE 






121: 


TYPDEC 


LSIZE 


002400 






MOV 


LSIZE. -CSP) 








TYPOS 










.OSABL 


CRF 








TYPE 


MS6112 


071075 






TYPEIT 


.MS6112 








.OSABL 


CRF 


002402 




31: 


TST 


MSIZE 








BEQ 


51 


004000 


002402 




CMP 


«2048. .MSIZE 








BNE 


13t 


000004 


002402 




SUB 


«4. MSIZE 






131: 


TYPDEC 


MSIZE 


002402 






MOV 


MSIZE. -CSP) 








TYPOS 










.DSABL 


CRF 








TYPE 


MS6113 


071127 






TYPEIT 


.MS6113 






.OSABL 


CRF 



t SUBTRACT 4K FOR THE I/O PAGE 

J J SAVE LSIZE FOR TYPEOUT 

iiGO TYPE—DECIMAL ASCII WITH SIGN 



: SUBTRACT 4K FOR THE I/O PAGE 

iiSAVE MSIZE FOR TYPEOUT 

::G0 TYPE--DECinAL ASCII WITH SIGN 



cvnjABO nsvii-j memory diag. macro yds. 02 

PRINT CONFIGURATION DETAILS 



6550 013374 022737 

6551 013402 001003 

6552 013404 162737 

6553 013412 
013412 013746 
01S416 104405 

6554 013420 
013420 104401 

6555 013424 
013424 032777 
013432 001002 

6556 013434 004737 

6557 013440 
013440 



004000 002452 S« : 
000004 002452 

6f : 

002452 
070177 

000100 167204 
032610 
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SEQ 0152 



CMP 
BNE 

SUB 

TYPOEC 
MOV 
TYPOS 
.OSABL 
TYPE 
TYPEIT 
.OSABL 



«2048. .1 
6« 

•4.1 

I 

I.-(SP) i 
CRF 

MSG070 
.MSG070 
CRF 



s SUBTRACT 4K FOR THE I/O PAGE 

sSAVE I FOR TYPEOUT 

i:G0 TYPE --DECIMAL ASCII WITH SIGN 



IF #SU6 OFF. IN SSUR 



CALL PCONFIG 
END I OF IF •SU6 



BIT •SU6.8SUR 
BNE L107 



L107: 



cvnjASo nsvii-J ncnoRY oxag. 

PRINT COHFICURATION DETAILS 



riACRO Y0S.02 rion^ay O7-Oct-05 16:57 P«a« 155 



sea OISS 































017700 


167164 


oow 


Al 


0A9700 


177761 


www X 




004770 


015466 


wwvc 




000137 


015506 


WW w J 




014150 






01S470 


014256 




6605 


013472 


014364 




6606 


015474 


014514 




6607 


015476 


014644 




6600 


015500 


014774 




6609 


015502 


015146 




6610 


015504 


015276 




6611 








6612 


013506 


C04737 


014050 


6615 








6614 


015512 







LOOP: NEUTST 



j*TEST 5 



<<OIAGNOSTIC nOOE DISPATCH ft0UTINE>> 
DIAGNOSTIC nOOE DISPATCH ROUTINE 



TST5: SCOPE 
CLR 

nov 
eic 

CALL 
JHP 

DISPTBL:BAFPAF 
BAFPAR 
BAUPAF 
BAUPAR 
PAFBAF 
PAFBAU 
PARBAF 
PARBAU 

MEriDONErCALL 



CONTFLAG 
0SUR.ro 
«tC16.R0 

aDISPTBL(RO) 
MEnDONE 



iGET SUITCHES 
I MASK TO ONLY MODE BITS 
> DISPATCH TO ROUTINE THROUGH NEXT TABLE 
J GO TO NEXT TEST 
iHODE OiBANKS FORWARD. PATTERNS FORWARD 
tHODE ItBANKS ''ORUARD. PATTERNS REVERSE 
iHODE 2tBANKS UORST FIRST. PATTERNS FORWARD 
iHODE SiBANKS WORST FIRST. PATTERNS REVERSE 
iHODE 4: PATTERNS FORWARD. BANKS FORWARD 
iHODE 5 1 PATTERNS FORWARD. BANKS WORST FIRST 
itIOOE 6 {PATTERNS REVERSE. BANKS FORWARD 
iHODE 7 1 PATTERNS REVERSE. BANKS UORST FIRST 



OOBACK 



: CHECK BACKGROUND PATTERN 



NEUTST << UNIQUE BANK TEST>> 
1*TEST 6 UNIQUE BANK TEST 



6615 
6616 



015512 000004 



6617 


013514 










013514 


005757 


002002 






013520 


001015 






6619 


013522 










015522 


012757 


177777 


002612 




013530 


012757 


177777 


002110 


6619 


013556 


004737 


021476 




6620 


013542 










015542 


012737 


177777 


002612 


6621 


013550 


005057 


002110 




6622 


013554 










013554 








6623 


013554 


004757 


014050 




6627 










6628 


013560 








6629 


013560 


004757 


022066 





TST6: SCOPE 

(HAKE SURE THAT EACH BANK CAN HAVE UNIQUE DATA 

iURITE AND READ THE BANK NUHBER IN EACH BANK (EXCEPT UHERE THE PROGRAH IS) 
IF SELONLY IS FALSE 

TST SELONLY 
BNE LllO 

SET HEADER. HUT 

nov •-1. HEADER 
riOV ♦-1.MUT 

CALL nT0027 
SET HEADER 

NOV *-l. HEADER 

CLR HUT 
END iOF IF SELONLY 

LllO: : : 1 1 1 1 

CALL DOBACK (RESTORE BACKROUNO PATTERN 

FLUSH: SUBTST <<FLUSH OUT OBE'S>> 



t*SUBTEST 

CALL 



FLUSH OUT OBE'S 
t1T0050 



CvnjAao nsvii-J nEnoAv oiag. 

END OF PASS ROUTINE 



663P 
6633 
6634 
6635 
6636 
6637 
6636 

6639 013564 

6640 013570 

6641 013574 

6642 013600 

6643 013604 

6644 013610 

6645 013612 

6646 013620 

6647 013624 
6646 013632 

013632 



005037 
012700 
042710 
062700 
020027 
003771 
013737 
005237 
042737 



002442 
002666 
020000 
000004 
003620 

002630 
056724 

100000 



104401 070321 



6649 013636 
013636 
013644 
013646 
013652 
013654 
013662 
013664 

6650 013664 
013664 

6651 013670 

6652 013674 
013674 

6653 013674 
013674 
015700 



6654 
6655 
6656 
6657 
6656 
6659 

6660 
6661 

6662 
6663 
6664 
6665 
6666 
6667 
6666 
6669 
6670 
6671 



013702 
013706 
013710 
013714 

013716 
013716 
013720 
013724 
013724 
013726 
013730 
013732 
013734 
013736 
013740 



032777 
001007 
005737 
001004 
023727 
001004 



104401 
005037 



013746 
104405 

013700 
001456 
022700 
001453 



010046 
004757 

012600 
000005 
004710 
000240 
000240 
000240 



004000 
002346 
056724 

067343 
002346 

056724 

000042 

002000 

040544 
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.SeTTL END OF PASS ROUTINE 



SEQ 0154 



•INCREMENT THE PASS NUMBER (IPASS) 

•INDICATE ENO-OF -PROGRAM AFTER EACH PASSES THRU THE PROGRAM 
•TYPE "END PASS ♦XXXXX" (UHERE XXXXX IS A DECIMAL NUMBER) 
•IF THERES A MONITOR GO TO IT 



•IF THERE ISN- 



002016 
056/24 



166772 



000001 



T JUMP TO LOOP 
FSINFLAG 
•C0NFIG*2.R0 
«eiT13.(R0) 
«4.R0 
R0.«3620 
It 

lERTTL.LASTERROR 
IPASS 

♦lOOOOO.IPASS 
MSG077 
.MSG077 
CRF 



lEOP: CLR 
MOV 

II: SIC 
ADD 
CMP 
BLE 
MOV 
INC 
BIC 
TYPE 
TYPEIT 
.OSABL 

IF tSUll SET. IN 9SUR OR QVFLAG IS TRUE OR IPASS EQ *1 



(MOVE kHD UORO OF CONFIG TO RO 
(CLEAR BACKGROUND VALID BIT 
t INCREMENT TO NEXT BANK 
lOONE? 

:N0 - BRANCH 

t: INCREMENT THE PASS NUMBER 
c DON'T ALLOU A NEG. NUMBER 
ssTVPE -END PASS 



TYPE 
TYPEIT 
.OSABL 

CLR 
END lOF 

TYPDEC 

MOV 

TYPDS 

.DSABL 

MOV 

BEQ 

IZAP42: CMP 



MSGOSS 

,MSG035 

CRF 

QVFLAG 
IF SUll 

IPASS 
IPASS. 



sQV 



BIT 
BNE 
TST 
BNE 
CMP 
BNE 

Llll: I i 1 1 1 i 



«SU11.8SUR 

Llll 

QVFLAG 

Llll 

IPASS. #1 

LU2 



(SP) 



lENOAO: 



IDOAGN: 



BEQ 
|UE ARE 
PUSH 

CALL 
POP 

RESET 
CALL 
NOP 
NOP 
NOP 



CRF 

42. RO 

IDOAGAIN 

♦STACK. RO 

IDOAGAIN 

UNDER (HEAVEN 

RO 

SHUTUP 
RO 



(RO) 



1 1 SAVE IPASS FOR TYPEOUT 
iiGO TYPE—DECIMAL ASCII 

itGET MONITOR ADDRESS 
iiBRANCH IF NO MONITOR 
lARE UE UNDER RTll 
I YES - BRANCH 
HELP US) XXDP! 



i : CLEAR THE WORLD 
iiGO TO MONITOR 
ijSAVE ROOM 
ijFOR 
iiACTll 



L112: i t : 1 1 ; 
WITH SIGN 



MOV 
MOV 



RO.-(SP) 
(SP)».RO 



UNDO SHUTUP STUFF 

RESTORE STACK 

ENERGIZE Q-BUS MAP £ 22 BIT ADDRESS/NG 
ENERGIZE MEMORY MANAGEMENT 
PUT LOADERS BACK HOME 



cvMjAeo nsvii-j tcnORY OIAg. 

END Of PASS ROUTINE 
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SCO 0155 



£^ f O 


vl 3 r *W 










A 9 VTAA 


Wv9 » 3 f 






wO ' * 




OAIOO'V 








A1 


V3c f ^ f 


WWW 




'ft 


A9 










A1 V 7 A. 3 




AA3^7A 




VO r 0 


A1 ^7JLiL 


013 70 1 
Vic IVk 


\A/WVA 




wO ' ▼ 


A1 ^773 


004757 








A1 V77IL 










m X77l^ 
UXd f rO 


AA^7^7 








A1 










A« AAAA 




















014012 


001014 






MAP 
owe 




012701 


000050 






014020 


077001 
062TS7 










000001 


056726 


6605 


01 40 SO 


005537 


056730 




6666 


014034 


077107 






6687 


014056 


C0S237 


056724 




6666 


014042 


000764 






6669 


014044 
014044 








6690 


014044 
014044 








6691 


014044 


000137 


01S440 





NOV KSTACK . SP 

TST N022eiT 
BNE II 

BIS 4eiT5!BIT4.mRS 
II: ENERGIZE 

nOV LOAOHOnE.RO 
nov •l.Rl 
CALL BANKnOV 
IF APTFLAG IS TRUE 



IF lUSUR EQ IPASS 

APTHANG: nOV •50. Rl 
21: SOB R0.2I 

ADD •I.IOEVCT 
AOC lUNIT 
SOB R1.2I 
INC IPASS 
BR APTHANG 
END I OF IF lUSUR 

END : OF IF APTFLAG 

IDOAGAIN: jnP LOOP 



lis THIS AN 11/63. 11/23-B OR 11/231 



iTURN ON NEnORY MANAGEMENT 
I DESTINATION BANK 
i SOURCE BANK 



TST APTFLAG 
BEQ L113 

CtiP lUSUR. IPASS 
L114 



{RETURN 



L114: 1 1 1 1 1 1 
L113: mill 



CVflJASO MSVXl-J MEMORY OIAG. 
END OF PASS ROUTINE 

6694 0140S0 



6695 014050 

6696 014054 
014054 
014060 

6697 014060 
6696 014064 

014064 
014070 
014072 
014076 

6699 014100 
014100 
014106 

6700 014114 

6701 014120 

6702 014124 
014124 

6703 014132 
014132 

6704 014132 
014132 
014136 
014144 
014146 

6705 014146 
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SCQ 0156 



OOBACK: SUBTST <<yRZTE BACKGROUND PATTERNS >> 
URITE BACKGROUND PATTERNS 



(•SUBTEST 



00bO37 


002112 




005037 


002102 




004757 


037760 




005737 
001420 
005737 
001015 


002116 
002124 




012737 
012737 
004737 
005037 


177777 
177777 
016772 
002110 


002612 
002110 


012737 


177777 


002612 


005237 
023737 
003745 


002102 
002102 


002556 



CLR PATTERN 

FOR BANK :- «0 TO LASTBANK 



CALL EXBANK 

IF ACFLAG IS TRUE AND RRFLAG IS FALSE 



CLR BANK 
B14: unit 



SET 



CALL 

CLR 

SET 



HEAOER.MUT 



MKTEST 
HUT 

HEADER 



(CALL 



TST ACFLAG 
BEQ L115 
TST RRFLAG 
BNE L115 

MOV «-l. HEADER 
MOV •-1.MUT 
MJTEST UOULO ALSO WORK 



000207 



END I OF IF ACFLAG 
END t OF FOR BANK 

RETURN 



MOV 

L115: 1 1 1 1 1 1 



••1. HEADER 



E14 



INC BANK 

CMP BANK. LASTBANK 
BLE B14 

i i 1 1 1 i i 



CVMJABO MSVll J MEMORY OIAG. 
MTEST MOOES 

6708 
6709 

6710 014150 



6711 
6712 
6713 
6714 
6715 
6716 
6717 
6716 
6719 
6720 
67^1 
6722 
6723 
6724 
6725 
6726 
6727 
6728 
6729 
6730 
6731 
6732 
6733 



6734 
6735 
6736 
6737 



014154 
014160 
014164 
014166 
014172 
014174 



014204 
014210 

014212 
014216 
014222 

014224 
014230 
014232 
014234 
014240 
014240 
014242 
014244 

014244 
014250 
014254 



004737 
005737 
001412 
005737 
001007 
005037 



014200 004737 



004737 
001373 

005037 
004737 
002354 

005737 
001401 
000207 
004737 

103001 
000207 



004737 
004737 
000207 
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.S8TTL MTEST MOOES 
BAFPAF: SUBTST <<BANKS FORUARD .PATTERNS FORWARD 



014150 005037 002102 



037760 
002116 

002124 

002112 

015450 

040402 



002222 
040426 



002126 
036310 



014150 
037122 



SCQ 0157 



• •RECURSIVE»»> > 



(•SUBTEST 



BANKS FORUARO. PATTERNS FORUARD 



••RECURSIVE** 



1»: 



2*1 



4t: 



5*: 



CLR 



BANK 



i START OF BANK LOOP 



CALL 

TST 

SEQ 

TST 

8NE 

CLR 



EXBANK 
ACFLAG 
4t 

RRFLAG 
4t 

PATTERN 



J START OF PATTERN LOOP 



(SET BANK TO 0 

■EXAMINE SANK 

:CAN UE ACCESS THIS BANK? 

I NO - GO TO BANK LOOP TERMINATION 

(RELOCATION REQUIRED? 

sYES - GO TO BANK LOOP TERMINATION 

tSET PATTERN TO 0 



CALL 



MTEST 



J GO TEST CORRECT MEMORY 
(TERMINATION OF PATTERN LOOP 

CALL INCPAT tGO SEE IF THIS IS THE LAST PATTERN 

BNE 2t iNO - LOOP ON THIS PATTERN 

i TERMINATION OF BANK LOOP 



CLR 
CALL 
BGE 



CONTFLAG 
INCBNK 
1* 



ENO OF LOOPS 



a 

TST 
BEQ 

RETURN 
CALL 



RLFLAG 
51 

RELOCATE 



ON. ERROR THEN IRE TURN 



(NEXT HIGHER BANK 

ilF NOT DONE - LOOP ON THIS BANK 

(HAVE UE BEEN RELOCATED? 
(NO - SKIP 
(YES - RETURN 
.MOVE e MAP PROGRAM 



i**NOTE** RECURSIVE CALL 
CALL BAFPAF 
CALL UNRELOCATE 
RETURN 



L116: 



BCC LI 16 
RTS PC 



(CALL SELF 

(UNMOVE £ UNMAP PROGRAM 



CvnjABO MSvii J riEnOftr 01 AC. 
BANKS FORUAftO. PATTERNS FQHuMD 
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• *RCCUf)SIVE** 



SEQ 



6740 


014256 






BAFPaR: SUBTST 


<<BANKS FORWARD. PAT TERNS REVERSE ••RECURSIVE^^ > > 










;*SUeTEST 


BANKS FORWARD. PATTERNS REVERSE aaRECURSIVE** 


6741 


014256 


005057 


002102 


ClR 


BANK 


J SET BANK TO 0 


6742 








; START 


OF SANK LOOP 




6745 


014262 


004737 


057760 


It: CALL 


kXBANK 


{EXAMINE BANK 


6744 


014266 


005757 


002116 


TST 


ACFLAG 


(CAN WE ACCESS THIS BANK? 


6745 


014272 


001412 




BEQ 


41 


{NO GO TO BANK LOOP TERMINATION 


6746 


014274 


005757 


002124 


TST 


RRFLAG 


{RELOCATION REQUIRED? 


6747 


014S00 


001007 




BNE 


4t 


{YES - GO TO BANK LOOP TERMINATION 


6748 


014302 


004757 


040416 


CALL 


SETPAT 


{SET HIGH PATTERN FOR CORRECT MEMORY 


6749 








{START 


OF PATTERN ..OOP 




6750 


014S06 


004 ■»57 


015450 


2»: CALL 


MTEST 


{GO TEST CORRECT MEMORY 


6751 








{TERMINATION OF PATTERN 


LOOP 


6752 


014S12 


005557 


002112 


DEC 


PATTERN 


{IS THIS THE LAST PATTERN? 


67SB 


014S16 


100575 




BPL 


2t 


{NO LOOP ON THIS PATTERN 


6754 








i TERMINATION OF BANK LOOP 


6755 


014S20 


005057 


002222 


4«: CLR 


CONTFLAG 




6756 


014S24 


C04757 


040426 


CALL 


INCBNK 


{NEXT HIGHER BANK 


6757 


014SS0 


002554 




BGE 


It 


{IF NOT DONE LOOP ON THIS BANK 


6756 








:ENO OF 


LOOPS 




6759 


014352 


005757 


002126 


TST 


RLFLAG 


(HAVE WE BEEN RELOCATED? 


6760 


014536 


001401 




BEQ 


5» 


{NO SKIP 


6761 


014540 


000207 




RETURN 




{YES RETURN 


6762 


'^14542 


004757 


056310 


5«: CALL 


RELOCATE 


{MOVE 6 MAP PROGRAM 


676S 


014546 






ON. ERROR THEN IRETURN 






014546 


105001 








BCC L117 




014350 


000207 








RTS PC 




014352 










L117: { { { ; i i 


6764 








{••NOTE** RECURSIVE CALL 


6765 


014552 


004737 


014256 


CALL 


BAFPAR 


{CALL SELF 


6766 


014556 


004757 


057122 


CALL 


UNRELOCATE 


{UNMOVE & UNMAP PROGRAM 


6767 


014562 


000207 




RETURN 







CVMJA80 nSVll J KMORY OIAC. 
BANKS roRWARO. PAT TERNS REVERSE 



6 '70 


014564 






6771 


014564 


005037 


002102 


67 '2 








6773 


014370 


004737 


037760 


6774 


014374 


005737 


002116 


6775 


014400 


001415 




6776 


014402 


005737 


002130 


6777 


014406 


001412 




677S 


014410 


005737 


002124 


6779 


014414 


001007 




6780 


014416 


005037 


002112 


6781 








6782 


014422 


004737 


015450 


6783 








6784 


014426 


004737 


040402 


6785 


014432 


001373 




6786 








6787 


014454 


005037 


002222 


6788 


014440 


004737 


040426 


6789 


014444 


002351 




6790 








6791 


014446 


005137 


002600 


6792 


014452 


001003 




6793 








6794 


014454 


004737 


014364 


6795 


014460 


000207 




6796 


014462 


005737 


002126 


6797 


014466 


001401 




6798 


014470 


000207 




6799 


014472 


004737 


036310 


6800 


014476 








014476 


103001 






014500 


000207 






014502 






6801 








6802 


014502 


004737 


014364 


6803 


014506 


004737 


037122 


6804 


014512 


000207 
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••RECURSIVE** 

BAUPAF: SUBTST <<BANKS UORST FIRST .PATTERNS FQRUARO **RECURSIVE** > > 



SCO 0159 



{•SUBTEST 



BANKS UORST FIRST. PATTERNS FQRUARO ••RECURSIVE*^ 



1»: 



21: 



4$ : 



51: 
6): 



CLR 



BANK 



i START OF BANK LOOP 



CALL 
TST 
BEQ 
TST 
BEQ 
TST 
BNE 
CLR 



tXBANK 
ACFLAG 
41 

BMFLAG 
41 

RRFLAG 
4t 

PATTERN 



; START OF PATTERN LOOP 



CALL 



MTEST 



J TERMINATION OF PATTERN LOOP 



:SET BANK TO 0 

{EXAMINE BANK 

{CAN UE ACCESS THIS BANK? 

(NO - GO TO BANK LOOP TERMINATION 

{IS THIS BAD MEMORY (WORST FIRST)? 

{NO GO TO BANK LOOP TERMINATION 

{RELOCATION REOUIREO? 

{YES - GO TO BANK LOOP TERMINATION 

{SET PATTERN TO 0 

{GO TEST CORRECT MEMORY 



CALL 
BNE 



INCPAT 
21 



{TERMINATION OF BANK LOOP 



{GO SEE IF THIS IS THE LAST PATTERN 
{NO LOOP ON THIS PATTERN 



CLR 
CALL 
BGE 



CONTFLAG 
INCBNK 
II 



{END OF LOOPS 



COM 
BNE 



UORST 
5» 



{NEXT HIGHER BANK 

{IF NOT DONE LOOP ON THIS BANK 

{IS THIS AN EVEN NUMBERED PASS? 



••NOTE^^ RECURSIVE CALL 
BAUPAF 



CALL 
RETURN 
TST RLFLAG 
BEQ 6) 
RETURN 

CALL RELOCATE 

ON. ERROR THEN IRETV^N 



{YES - SKIP 
{CALL SELF 



{HAVE UE BEEN RELOCATED? 
{NO SKIP 
{YES - RETURN 
{MOVE C MAP PROGRAM 



{••NOTE** RECURSIVE CALL 
CALL BAUPAF 
CALL UNRELOCATE 
RETURN 



L120: 



BCC L120 
RTS PC 



{CALL SELF 

{UNMOVE C UNCAP PROGRAM 
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BANKS WORST FIRST. PATTERNS FORUARO aaRECURSIVE** 



SEQ 0160 



6007 


014514 






BAUPAR: 


SUBTST 


<<BANKS WORST FIRST .PATTERNS REVERSE ••RECURSI^E**^ > 










:*SUeTEST 


BANKS WORST 


FIRST. PATTERNS REVERSE **RECURSIVE** 


6806 


014514 


005037 


002102 




CLR 


BANK 




(SET BANK TO 0 


6S09 










; START 


OF BANK LOOP 






6610 


014520 


004737 


037760 


11 : 


CALL 


EXBANK 




{EXAMINE BANK 


6611 


014524 


005737 


002116 




TST 


ACFLAG 




:CAN WE ACCESS THIS BANK? 


6612 


014530 


001415 






BEQ 


4$ 




iW - GO TO BANK LOOP TERMINATION 


6613 


014532 


005737 


002130 




TST 


BMFLAG 




lis THIS BAD MEMORY (WORST FIRST) 


6814 


014536 


001412 






BEQ 


4$ 




:N0 - GO TO BANK LOOP TERMINATION 


6815 


014540 


005737 


002124 




TST 


RRFLAG 




{RELOCATION RfcOUIREO? 


6816 


014544 


001007 






BNE 


41 




:YES - GO TO BANK LOOP TERMINATION 


6817 


014546 


004737 


040416 




CALL 


SETPAT 




;SET HIGH PATTERN FOR CORRECT MEMORY 


6818 










: START 


OF PATTERN LOOP 




6819 


014552 


004737 


015450 


21 : 


CALL 


MTEST 




tGO TEST CORRECT MEMORY 


6820 










1 TERMINATION OF PATTERN 


LOOP 


6821 


014S56 


005337 


002112 




DEC 


PATTERN 




sIS THIS THE LAST PATTERN? 


6822 


014562 


100373 






BPL 


2» 




:N0 LOOP ON THIS PATTERN 


6823 










: TERMINATION OF BANK LOOP 


6824 


014564 


005037 


002222 


: 


CLR 


CONTFLAG 






6825 


014570 


004737 


040426 




CALL 


INCBNK 




sNEXT HIGHER BANK 


6826 


014574 


002351 






BGE 


1* 




sIF NOT DONE - LOOP ON THIS BANK 


6827 










:ENO OF 


LOOPS 






6828 


014576 


005137 


002600 




COM 


WORST 




:IS THIS AN EVEN NUMBERED PASS? 


6829 


014602 


001003 






BNE 


5» 




J YES - SKIP 


6830 










:**NOTE** RECURSIVE 


CALL 




6831 


014604 


004737 


014514 




CALL 


BAWPAR 




;CALL SELF 


6832 


014610 


000207 






RETURN 








6833 


014612 


005737 


002126 


5*: 


TST 


RLFLAG 




:HAVE WE BEEN RELOCATED? 


6834 


014616 


001401 






BEQ 


6$ 




jNO - SKIP 


6835 


014620 


000207 






RETURN 






{YES - RETURN 


6836 


014622 


004737 


0S6S10 


61: 


CALL 


RELOCATE 




{MOVE e MAP PROGRAM 


6837 


014626 








ON. ERROR THEN tRET'.iRN 




014626 


103001 












BCC L121 




014630 


000207 












RTS PC 




014632 














L121: : : { : t s 


6838 










]**NOTE** RECURSIVE 


CALL 




6839 


014632 


004737 


014514 




CALL 


BAWPAR 




{CALL SELF 


6840 


014636 


004737 


037122 




CALL 


UNRELOCATE 




{UNMOVE £ UNIIAP PROGRAM 


6841 


014642 


000207 






RETURN 









CvnjABO nSVll-J nEnORr OIAG. riACRO YOS.02 Monday 07-0ct-8S 16:57 Pag* 169 
BANKS UOAST FIRST .PATTERNS REVERSE **RECURSIVE** 

PAFBAF: SU8TST <<PATTERNS FORWARD. BANKS FORWARD 



SEQ 0161 



6644 


014644 






6645 


014644 


005037 


002112 


6646 








6847 


014650 


005037 


002102 


6848 








6849 


014654 


004737 


037760 


6850 


014660 


004737 


040364 


6851 


014664 


001010 




6852 


014666 


005737 


002116 


6853 


014672 


001405 




6854 


014674 


005737 


002124 


6855 


014700 


001002 




6856 


014702 


004737 


015450 


6857 








6858 


014706 


005037 


002222 


6859 


014712 


004737 


040426 


6860 


014716 


C02356 




6861 








6862 


014720 


004737 


040402 


6863 


014724 


001351 




6864 








6865 


014726 


005137 


002134 


6866 








6867 


014732 


001403 




6868 








6869 


014734 


004737 


014644 


6870 


014740 


OOC207 




6871 


014742 


005737 


002126 


6872 


014746 


001401 




6873 


014750 


000207 




6874 


014752 


004737 


036310 


6875 


014756 








014756 


103001 






014760 


000207 






014762 






6876 








6877 


014762 


004737 


014644 


6878 


014766 


004737 


037122 


6879 


014772 


000207 





**RECURSIVE**>> 



i*SUBTEST 



PATTERNS FORWARD. BANKS FORWARD 



**RECURSIVE** 



1*: 
2*; 



41: 



51; 
6t: 



CLR 



PATTERN 



J START OF PATTERN LOOP 



CLR 



BANK 



s START OF BANK LOOP 



sSET PATTERN TO 0 
I SET BANK TO 0 



CALL EXBANK 

CALL BANKOK 

BNE 4* 

TST Av,FLAG 

BEQ 41 

TST RRFLAG 

BNE 41 

CALL MTEST 
iTERniNATION OF BANK LOOP 

CLR CONTFLAG 

CALL INCBNK 

BGE 2$ 

J TERMINATION OF PATTERN LOOP 



{EXAMINE BANK 

(CORRECT MEMORY FOR THIS BANK? 
sNO - GO TO BANK LOOP TERMINATOR 
(CAN UE ACCESS THIS BANK? 
I NO - GO TO BANK LOOP TERMINATION 
(RELOCATION REQUIRED? 
(YES - GO TO BANK LOOP TERMINATION 
(GO TEST CORRECT MEMORY 



(NEXT HIGHER BANK 
:IF NOT DONE - LOOP ON THIS BANK 



CALL 
BNE 



INCRPT 
II 



(END OF LOOPS 



COM 
BEQ 



TMFLAG 
SI 



(NEXT HIGHER PATTERN 
(OK • LOOP I ELSE CONTINUE 

(COMPLEMENT TYPE OF MEMORY 
(IS THIS AN EVEN NUMBER PASS? 



{**NOTE** RECURSIVE CALL 
CALL PAFBAF 
RETURN 

TST RLFLAG 
BEQ 61 
RETURN 

CALL RELOCATE 
ON. ERROR THEN IRETIAN 



(YES - SKIP 
(CALL SELF 

(HAVE UE BEEN RELOCATED? 
(NO - SKIP 
(YES - RETURN 
(MOVE £ MAP PROGRAM 



(**NOTE** RECURSIVE CALL 



L122: 



BCC L122 
RTS PC 



( { ( i 



CALL 
CALL 
RETURN 



PAFBAF -CALL SELF 

UNRELOCATE juNMOVE 6 UNMAP PROGRAM 



CVMJA80 MSVll-J MEMORY DI*G. 
PATTERNS rORWARD. BANKS rORUARO 



^ ■ A 

6B02 


014774 






6003 


014774 




wUexxc 


A AAA 

O004 








O009 


Ul30Uv 


nAVAX7 
Uv^VO r 


WcXUc 


oooe 








DOO r 


Ui3W4 


nAA7V7 


Vd r rDV 


oooo 


A 1 Kf% t A 


nAA7Y7 


W^V^O^ 


OOOY 


A1 ^A1 A 


\WXVXO 






A1 4tA1 A 




WcXxD 




A1 ^A09 


wx^xv 










wc X <9V 






WX^V J 










009 19A 






wx wc 








OOA7S7 


vx w^^v 


DOT » 








w070 




C050S7 


002222 






OA47S7 


040426 


















A4A9 






04040P 

Wfc 




VX 


00134& 














VX JVv^ 


AA51S7 

VVwX^ r 


AApt S4 

WS X 










0 TV ' 


V X r V 


wx~v«# 














VX r C 




014774 

V X^ f f ^ 




VX^V > V 








V X W X w 


005 1S7 

WW Aw* 


002600 




vx^ xv^ 


wx 














AlSiM 

V A w A W 


004737 


014774 


0 7 A 


vX J X XC 


000 20 7 






VX JXX^ 




002126 

WS XSw 


AQ1 7 


V X JXCV 


W X^Vi 




691S 


015122 


000207 




6919 


015124 


004737 


036310 


6920 


015130 








015130 


103001 






015132 


000207 






015134 






6921 








6922 


015134 


004737 


014774 


6923 


015140 


004737 


037122 


6924 


015144 


000207 
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**RECURSIVE** 



P»0« 171 



SEQ 0162 



PAFBAU: SUBTST <<PATTERNS FORUARD. BANKS UORST FIRST **RECURSIVE**> > 



i*SUBTEST 



PATTERNS FORUARO. BANKS WORST FIRST **RECURSIVE** 



It: 
2t: 



41; 



5t: 

6ti 
7»i 



CLR 



PATTERN 



! START OF PATTERN LOOP 



CLR 



BANK 



(START OF BANK LOOP 



(SET PATTERN TO 0 
sSET BANK TO 0 



CALL EXBANK 

CALL BANKOK 

BNE 41 

TST ACFLA6 

BEQ 4$ 

TST BMFLA6 

BEQ 4* 

TST RRFLAG 

BNE 4$ 

CALL MTEST 
(TERMINATION OF BANK LOOP 

CLR CONTFLAG 



(EXAMINE BANK 

(CORRECT MEMORY FOR THIS BANK? 
(NO - GO TO BANK LOOP TERMINATOR 
(CAN UE ACCESS THIS BANK? 
(NO - GO TO BANK LOCP TERMINATION 
(IS THIS BAD MEMORY (UORST FIRST) 
(NO - GO TO BANK LOOP TERMINATION 
(RELOCATION REQUIRED? 
(YES - GO TO BANK LOOP TERMINATION 
(GO TEST CORRECT MEMORY 



CALL 
BGE 



TNCBNK 
21 



rcKMINATION OF PATTERN LOOP 



(NEXT HIGHER BANK 
(IF NOT DONE - LOOP ON THIS BANK 



CALL 
BNE 



INCRPT 
II 



(END OF LOOPS 



COM 
BEQ 



TMFLAG 
SI 



{**NOTE** RECURSIVE CALL 
CALL PAFBAU 
RETURN 

COM UORST 

BNE 61 (YES 
(**NOTE** RECURSIVE CALL 



(NEXT HIGHER PATTERN 
(OK - LOOP{ ELSE CONTINUE 

(COMPLEMENT TYPE OF MEMORY 
ilS THIS AN EVEN NUMBER PASS? 
(YES - SKIP 



(CALL SELF 

(4TH PASS? 

SKIP 



CALL PAFBAU 
RETURN 

TST RLFLAG 

BEQ 71 
RETURN 

CALL RELOCATE 

ON. ERROR THEN IRETURN 



(CALL SELF 

(HAVE UE BEEN RELOCATED? 
(NO - SKIP 
(VES - RETURN 
(MOVE e MAP PROGRAM 



(**NOTE** RECURSIVE CALL 
CALL PAFBAU 
CALL UNRELOCATE 
RETURN 



BCC L123 
RTS PC 
L123: { { i ( i { 



(CALL SELF 

(UNMOVE £ UNMAP PROGRAM 
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PATTERNS FORWARD. BANKS WORST FIRST **RECURSIVE*« 

PARBAF. SUBTST <<PATTERNS REVERSE, BANKS FORWARD 



SEQ 0163 



6927 


015146 






6928 


015146 


004737 


040416 


6929 








6930 


015152 


005037 


002102 


6931 








6932 


015156 


004737 


037760 


6933 


015162 


004737 


040364 


6934 


015166 


001010 




6935 


015170 


005737 


002116 


6936 


015174 


001405 




6937 


015176 


005737 


002124 


6938 


0«5202 


001002 




6939 


0i5204 


004737 


015450 


6940 








6941 


015210 


005037 


002222 


6942 


015214 


004737 


040426 


6943 


015220 


C02356 




6944 








6945 


015222 


005337 


002112 


6946 


015226 


100351 




6947 








6948 


015230 


005137 


002134 


6949 








6950 


015234 


001403 




6951 








6952 


015236 


004737 


015146 


6953 


015242 


000207 




6954 


015244 


005737 


002126 


6955 


015250 


001401 




6956 


015252 


000207 




6957 


015254 


004737 


036310 


6958 


015260 








015260 


103001 






015262 


000207 






015264 






6959 








6960 


015264 


004737 


015146 


6961 


015270 


004737 


037122 


6962 


015274 


000207 





**RECURSIVE**>> 



i*SUBTEST 
I***' 

It: 
2(: 



PATTERNS REVERSE, BANKS FORWARD 



•♦RECURSIVE** 



4»i 



5»; 
6t: 



CALL 



HIPAT 



J START OF PATTERN LOOP 
CLR BANK 
(START OF BANK LOOP 
CALL 
CALL 
BNE 
TST 
BEQ 
TST 
BNE 
CALL 



;SET HIGHTEST PATTERNS 
(SET BANK TO 0 



i EXAMINE BANK 

{CORRECT MEMORY FOR THIS BANK? 
iNO - GO TO BANK LOOP TERMINATOR 
tCAN WE ACCESS THIS BANK? 
(NO - GO TO BANK LOOP TERMINATION 
i RELOCATION REQUIRED? 
iYES - GO TO BANK LOOP TERMINATION 
I GO TEST CORRECT MEMORY 



EXBANK 
BANKOK 
4* 

ACFLAG 
4* 

RRFLAC 
4» 

MTEST 

{TERMINATION OF BANK LOOP 
CLR CONTFLAG 

CALL INCBNK sNEXT HIGHER BANK 

BGE 2» (IF NOT DONE - LOOP ON THIS BANK 

{TERMINATION OF PATTERN LOOP 



DEC 
BPL 



PATTERN 
1« 



{END OF LOOPS 



COM 
BEQ 



TMFLAG 



(**NOTE** RECURSIVE CALL 
CALL PARBAF 
RETURN 

TST RLFLAG 
BEQ 61 
RETURN 

CALL RELOCATE 
ON. ERROR THEN *RETURN 



{NEXT LOWER PATTERN 
(OK - LOOP{ ELSE CONTINUE 

{COMPLEMENT TYPE OF MEMORY 
(IS THIS AN EVEN NUMBER PASS? 
(YES - SKIP 



iCALL SELF 

(HAVE WE BEEN RELOCATED? 
(NO - SKIP 
(YES - RETURN 
{MOVE £ MAP PROGRAM 



{**NOTE** RECURSIVE CALL 



BCC L124 

RTS PC 
L124: ({{((( 



CALL 
CALL 
RETURN 



PARBAF 'CALL SELF 

UNRELOCATE iuNMOVE £ UNMAP PROGRAM 



CvnjABO nSVll-J nEMORY 01 AC. 
PATTERNS REVERSE. BANKS FORWARD 
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••RECURSIVE** 
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SEQ 0164 



6965 


015276 






6966 


015276 


004737 


040416 


6967 








6968 


015302 


005037 


002102 


6969 








6970 


015306 


004737 


037760 


6971 


015312 


004737 


040364 


6972 


015316 


001013 




6973 


015320 


005737 


002116 


6974 


015324 


001410 




6975 


015326 


005737 


002130 


6976 


015532 


001405 




6977 


0155S4 


005737 


002124 


6978 


015S40 


001002 




6979 015542 


004737 


015450 


6980 








6981 


015346 


C050'7 


002222 


6982 


015352 


004737 


040426 


6983 


015356 


002353 




6984 








6985 


015360 


005337 


002112 


6986 


015364 


100346 




6987 








6988 


015366 


005137 


002134 


6989 








6990 


01SS72 


001403 




6991 








6992 


015374 


004737 


015276 


6993 


015400 


000207 




6994 


015402 


005137 


002600 


6995 


015406 


001003 




6996 








6997 


015410 


004737 


015276 


6998 


015414 


000207 




6999 


015416 


005737 


002126 


7000 


015422 


001401 




7001 


015424 


000207 




7002 


015426 


004737 


036310 


7003 


015432 








015432 


103001 






015434 


000207 






015436 






7004 








7005 


015436 


004737 


015276 


7006 


015442 


004737 


037122 


7007 


015446 


000207 





PARBAU: SUBTST <<PATTERNS REVERSE .BANKS WORST FIRST •*RECURSIVE**> > 



i *SUBTEST 
:***< 

1»: 
21: 



PATTERNS REVERSE. BANKS WORST FIRST **RECURSIVE** 



4«: 



5$: 

6«: 
71: 



CALL HIPAT 
I START OF PATTERN LOOP 
CLR BANK 
i START OF BANK LOOP 



I SET HIGHTEST PATTERN 
tSET BANK TO 0 



CALL EXBANK 
CALL BANKOK 
BNE 41 
TST ACFLAG 
BEQ 4* 
TST BMFLAG 
BEQ 4t 
TST RRFLA6 
BNE 4$ 
CALL MTEST 
(TERMINATION OF BANK LOOP 
CLR CONTFLAG 



I EXAMINE BANK 

(CORRECT MEMORY FOR THIS BANK? 
(NO - GO TO BANK LOOP TERMINATOR 
(CAN WE ACCESS THIS BANK? 
(NO - GO TO BANK LOOP TERMINATION 
;IS THIS BAD MEMORY (WORST FIRST) 
(NO - GO TO BANK LOOP TERMINATION 
(RELOCATION REQUIRED? 
(YES - GO TO BANK LOOP TERMINATION 
(GO TEST CORRECT MEMORY 



CALL INCBNK 


(NEXT HIGHER BANK 


BGE 21 


(IF NOT DONE - LOOP ON THIS BANK 


(TERMINATION OF PATTERN LOOP 


DEC PATTERN 


(NEXT LOWER PATTERN 


BPL 11 


(OK - LOOPi ELSE CONTINUE 


(END OF LOOPS 




COM TMFLAG 


! COMPLEMENT TYPE OF MEMORY 




:IS THIS AN EVEN NUMBER PASS? 


BEQ 5$ 


(YES - SKIP 


a**NOTE** RECURSIVE 


CALL 


CALL PARBAW 


(CALL SELF 


RETURN 




COM WORST 


:4TH PASS? 


BNE 61 


I YES - SKIP 


(**NOTE«* RECURSIVE 


CALL 


CALL PARBAW 


(CALL SELF 


RETURN 


TST RLFLAG 


(HAVE WE BEEN RELOCATED? 


BEQ 71 


jNO - SKIP 


RETURN 


iYES - RETURN 


CALL RELOCATE 


(MOVE e MAP PROGRAM 


ON. ERROR THEN IRETURN 



(••NOTE** RECURSIVE CALL 
CALL PARBAW 
CALL UNRELOCATE 
RETURN 



BCC L125 
RTS PC 
L125: s ( t i ( ( 



(CALL SELF 

(UNMOVE d UNMAP PROGRAM 



CvnjAeo Hsvii-J rcnoRY 

PATTERNS REVERSE. BANKS 
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WORST FIRST **RECURSIVE** 



7010 


015430 






7011 


015430 








A 1 CAVA 


Al 07T7 

Olc 1 3 f 


1 77777 


7Q12 












A1 07^7 

U12 r <9 r 


1 77777 
X 1 f i f f 


7 A f V 


WI3404 


AACAT7 




7A1 A 
'Vl^ 


A1 <A7A 




vUclcO 


fU13 


A1 ^A7k 


OA1 X 




f UIO 


Vl34 f O 














'Ul ' 


A1 

yi>4 fO 










00^7*^7 








AA| on^ 






U133V4 








W433V4 


00^7X7 


A09XA9 




SJ Ljj X\J 


001 009 




7A1 Q 




rOA7X7 


Ol S^AA 


7090 

f VfiV 










015516 






7021 


015516 








015516 






7022 


015516 


004737 


016772 


7023 


015522 


000402 




7024 


015524 


004737 


017212 


7025 


015530 


005037 


002110 


7026 


015534 








015534 


012737 


mm 


7027 


015542 


000207 





MTEST: SUBTST 



.•SUBTEST 



002612 
002110 



MTl: 
MT2: 



002612 



SET 

SET 

CLR 
TST 
BEQ 
BEGIN 



<<SU6R 
SUBR 
HEADER 
HUT 

PASFLG 
nKFLAG 
MTl 

HOLOLOOP 



SETUP flEnORY TEST>> 
SETUP MEMORY TEST 



{INITIALIZE HEADER MESSAGE TYPEOUT 

MOV t-l. HEADER 

i INDICATE THERE IS A MEMORY UNDER TEST 

MOV ♦-1.MUT 



sECC7 

(NO - SKIP 



IF CONTFLAG IS TRUE THEN LEAVE HOLOLOOP 
IF SKIPMK IS FALSE 



BIS: i I i t i I 



CALL MKCONTROL 
END} OF IF SKIPMK 



TST CONTFLAG 
BNE E15 

TST SKIPMK 
BNE L126 



END 

CALL 

BR 

CALL 

CLR 

SET 

RETURN 



HOLOLOOP 

MKTEST 
MT2 
MJTEST 
MUT 

HEADER 



;YES 



L126: > s 1 1 1 1 

E15: i I t ; I ( 
00 ECC TESTS 



;D0 PARITY TESTS 

:NOU - NO MEMORY UNDER TEST 

tALLOU HEADERS NORMAL 

MOV 



«-l. HEADER 



SEQ 0165 



CvnjABO nsvii-j nEnoRY oiag. 
SUBR SETUP HEMORY TEST 

7050 01SS44 



7031 
70S2 
70SS 
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nKCONTROL:SUBTST <<SUeR TEST ECC CSR LOGIC OISPATCH>> 



SEQ 0166 



i*SUeTEST 



SUBR 



TEST ECC CSR LOGIC DISPATCH 



(THE NEXT TUG MODULES SOLVE THE PROBLEH OF 
sHOU TO RUN THE CSR TESTS ON EACH ECC HEHORY 



» 


015544 










ir SELONLY IS TRUE THEN {RETURN 








0057S7 


002002 










TST SELONLY 




015550 














BEO L127 




015552 


000207 












RTS PC 




015554 














'••••lit 


70SS 


015554 










IF INHECC IS TRUE THEN tRETURN 




015554 


005737 


002536 










TST I»#CCC 




015560 


001401 












BEQ LISO 




015562 


000207 












RTS PC 




015564 














L 1 SO : 1 1 s 1 I t 


7036 


015564 










PUSH 


BANK R0.R1.R2.RS 






015564 


013746 


002102 










MOV BANK . - ( SP ) 




01SS70 


C 10046 












MOV RO.-(SP) 




015572 


010146 












nov Rl. -(SP) 




015574 


010246 












nov R2 . • ( SP ) 




015576 


010546 












nov RS. -(SP) 


7037 


015600 


012737 


060000 


002232 




MOV 


#FIRST . CSRFBANK 


:SET FIRST TEST ADDRESS TO FIRST ADOR 


70S8 


015606 


012757 


157776 


002234 




nov 


M.AST . CSRLBANK 




7039 


015614 


005057 


002256 






CLR 


CSRINT 




7040 


015620 


005057 


002240 






CLR 


SPLTCSR 




7041 


015624 


005057 


002532 






CLR 


CSRLOOP 


( AND ZERO THE LOOP COUNTER 


7042 


015630 


015700 


002104 






MOV 


bankinoex.ro 


sGET THE BANK INDEX 


7043 


015634 


016001 


002664 






MOV 


C0NFIG(R0).R1 


sGET CSR NUMBER 


7044 


015640 


000501 








SUAB 


Rl 


7045 


015642 


042701 


177760 






BIC 


#tC17.Rl 




7046 


015646 


006501 








ASL 


Rl 




7047 


015650 


010157 


002526 






nov 


Rl.CSRHOLD 


1 STORE IN THE LOU BYTE 


7048 


015654 


005737 


002136 






TST 


INTFLAG 


lis THIS BANK INTERLEAVED? 


7049 


015660 


001421 








BEQ 


1« 


(BRANCH IF NOT INTERLEAVED 


7050 


015662 


005257 


002240 






INC 


SPLTCSR 




7051 


015666 


012737 


120000 


002234 




MOV 


«i20000. CSRLBANK 




7052 


015674 


005237 


002332 






INC 


CSRLOOP 


sUE MUST LOOP TUICE FOR AN INTERLEAVED BANK 


7053 


015700 


005257 


002236 






INC 


CSRINT 




7054 


C 15704 


016001 


002664 






MOV 


C0NFI6fR0).Rl 


iGET THE INTERLEAVE CSR NUMBER 


7055 


015710 


072127 


177775 






ASH 


♦-3.R1 




7056 


015714 


042701 


160777 






BIC 


•tC17000.Rl 




7057 


015720 


050157 


002S26 






BIS 


Rl.CSRHOLD 


iSTORE IT IN CSRHOLD'S UPPER BYTE 


7058 


015724 


005005 






11: 


CLR 


R5 




7059 


015726 


116557 


002526 


002152 


MKLOOP: 


MOVB 


CSRH0L0(R5).CSRN0 




7060 


015734 


042757 


177741 


002152 




BIC 


•tC36.CSRN0 


t CLEAR ANY UNNECESSARY BITS 


7061 


015742 










FOR MKCNT :> •O TO CSRINT 






015742 


005057 


016364 










CLR MKCNT 




015746 














B16 : t i 1 : > 1 


7062 


015746 










FOP 


CSRFIRST :• CSRFBANK TO 


CSRLBANK BY MOOO 




015746 


013757 


002232 


002226 








MOV CSRFBANK. CSRriRST 




015754 














B17: 1 i i i 1 ; 


7063 


015754 










MAP 


BANK 


sMAP TEST SPACE TO BANK 




015754 


010546 












nov R3.-(SP) 




015756 


015705 


002102 






MOV 


BANK.R5 






015762 


004737 


035604 






CALL 


MAPPER 





CVMJA80 MSVll-J MCMWY OIAG. MACRO Y05.02 
SueA TEST ECC CSA LOGIC DISPATCH 



Monday 07-Oct-eS 16:57 Pa«« 179-1 
.OSABL CAF 



SEQ 0167 





015766 


012603 




7064 


015770 


104511 




7065 


015772 
015772 






7066 


015772 


00503/ 


002334 


7067 


015776 








015776 


005737 


002116 




016002 


001503 






016004 


005737 


002124 




016010 


001100 




^066 


016012 


013737 


002226 


7069 


016020 


062737 


004000 


7070 


016026 








016026 


013737 


002226 




016034 






7071 


016034 


013737 


002412 


7072 


016042 


005737 


002240 


7073 


016046 


001404 




7074 


016050 


C62737 


040000 


7075 


016056 


000403 




7076 


016060 


062737 


000002 


7077 


016066 


004737 


016366 


7078 


016072 
016072 


103440 




7079 


016074 


104424 




7080 


016076 


005037 


002076 


7081 


016102 








016102 


005037 


002452 




016106 






7082 


016106 








016106 


012737 


177777 


7083 


016114 


005037 


002264 


7084 


016120 








016120 


013700 


002452 


7085 


016124 
016124 


010346 




7086 


016126 


010637 


002146 


7087 


016132 


162737 


000002 


7088 


016140 


004737 


016672 


7089 


016144 
016144 


012603 




7090 


016146 








016146 


005237 


002452 




016152 


023727 


002452 




016160 


003752 






016162 






7091 


016162 


104423 




7092 


0:S164 








016164 


012737 


177777 


7093 


016172 
016172 


000407 




7094 


016174 
016174 






7095 


016174 








016174 


062737 


000004 




016202 


023737 


002412 



002230 
002230 

002412 

002414 

002414 
002414 



002612 



002146 



000027 



002334 



002412 
002230 



MOV (S»>)».A3 
(INVALIDATE BACKROUND PATTERN 



INVALIDATE 

BEGIN CSRSTUFF 

B20 : 1 1 1 1 > s 

CLR SUCCESS 

IF ACFLAG IS TRUE AND RRFLAG IS FALSE 

TSi ACFLAG 
Bra L131 
T: T RRFLAG 
8NE L131 

MOV CSRFIRST.CSRLAST 
ADD MOOO.CSRLAST 

FOR TESTADD :- CSRFIRST TO CSRLAST BY M 

MOV CSRFIRST. TEST ADO 
B21 : 1 1 > > > i 

MOV TESTADD. TtSTA0D*2 

TST SPLTCSR 
BEQ 1« 

ADD MOOOO. TEST ADD *2 

BR 2« 



II: ADD •2, TESTADD *2 

21: CALL SBETEST 
ON.NOERROR 

CACHOFF 

CLR NOPAR 

FOR I :- «0 TO •27 



SET HEADER 

CLR PASFLG 
LET RO :• I 

PUSH R3 

riOV SP.CTLKVEC 
SUB •2.CTLKVEC 
CALL CSRCASE 
POP RS 

END lOF FOR I 



CACHON 

SET SUCCESS 
LEAVE CSRSTUFF 
END lOF ON.NOERROR 
ENO (OF FOR TESTAOO 



BCS LI 32 

iTURN CACHE OFF 
(INDICATE PARITY ACTION 

CLR I 

B22 : : : s s t : 

MOV • 1. HEADER 

nov I.RO 
(SAVE LOOP COUNTER 

MOV R3.-(SP) 

(SAVE VECTOR IN CSR OF tK 

(RESTORE LOOP COUNTER 

nOV (SP)*.R3 

INC I 
CMP I. #27 
BLE B22 

E22 : t ( t ( 1 1 1 
(TURN CACHE ON 

nOV t-l. SUCCESS 
BR E20 

L1S2: i 1 1 1 1 1 

ADO #4. TEST W 

CMP TESTAOO. CSRLAST 



I 



cvnjABo nsvii-j nenonr OIag. macro yos.02 

SUSR TEST ECC CSR LOGIC DISPATCH 



















7096 


016212 








016212 






7047 

f v~ 1 










016212 






7096 


016212 










0057S7 


002334 






001012 

W AW AS 




7099 


016220 








016220 


104401 


067257 


7100 


016224 








016224 


013746 


002102 




0162 SO 


104403 






016232 


003 






016233 


000 




7101 


016234 








016234 


104401 


067315 


7102 


016240 


004737 


050354 


7103 


016244 








016244 






7104 


016244 








016244 


062737 


004000 




016252 


025757 


002226 




016260 


005655 






016262 






7105 


016262 


005257 


002240 


7106 


016266 








016266 


005257 


016364 




016272 


023737 


016364 




016300 


003622 






016302 






7107 


016302 


062757 


000002 


7100 


C 16310 


012757 


000001 


7109 


016316 


005205 




7110 


016320 


020557 


002552 


7111 


016324 


005002 




7112 


016326 


000157 


015726 


7115 


016332 


104472 




7114 


016334 








016334 


012757 


177777 


7115 


016342 


005037 


002240 


7116 


016346 








016546 


012603 






016S50 


012602 






016S52 


012601 






016354 


012600 






016556 


012637 


002102 


7117 


016362 


000207 




7118 


016364 


000000 
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END lOf IF 
END CSHSTUFF 
IF SUCCESS IS FALSE 



SCQ 0168 



BLE 

E21; 1 1 1 1 1 1 1 
LlSl: > i 1 1 1 1 
E20 : 1 1 1 ; 1 1 
TST 



821 



TYPE NSGA34 
TYPEIT .nSGA34 
.DSA8L CRF 

TYPOCS BANK. < TYPES BANK NUMBER >. 3 
nOV B'NK -CSP) It SAVE BANK FOR TYPEOUT 

t (TYPES BANK NUMBER 
11 GO TYPE- -OCTAL ASCII 
nTYPE 3 OIGIT(S) 
i I SUPPRESS LEADING ZEROS 



SUCCESS 
LISS 



TYPOS 
.BYTE 
.BYTE 
.OSABL 



1«! 



3 
0 

CRF 

TYPE MSGB34 
TYPEIT .nSGB34 
.OSABL CRF 

CALL PERBNK 
END I OF IF SUCCESS 

L133:siiiii 

ENDS OF FOR CSRFIRST 

ADD 
CMP 
BLE 

E17: i s I { i i t 

INC SPLTCSR 
ENDi OF FOR MKCNT 

INC 
CMP 
BLE 

F*6: 1 s t i : ; t 

ADO «2.CSRFBANK 

MOV tfl. SPLTCSR 

INC R5 

CMP R5.CSRL00P 

BGT It 

JMP MKLOOP 

ECCINIT I TRAP ON DOUBLE BIT ERRORS CNORMAL) 

SET CONTFLAG 

MOV 

CLR SPLTCSR 

POP R3.R2.R1.ro. BANK 

MOV 
MOV 
MOV 
MOV 
MOV 



•4000. CSRFIRST 
CSRFIRST. CSRLBANK 
817 



MKCNT 

MKCNT. CSRINT 
B16 



MKCNT: 



RETURN 
.UORD 



•-1. CONTFLAG 



CSP)*.R3 
CSP)».R2 
(SP)».R1 
(SP)*.R0 
CSP)».BANK 



{COUNTER FOR MKLOOP 



cvnjA80 nsvii-j HEnonr oiac. hacro 

SUBR TEST CCC CSft LOGIC DISPATCH 
7121 016366 



7122 
712S 
7124 
7125 
7126 
7127 
7126 
7129 
7130 
7131 
7132 
7133 
7134 
7135 
7136 
7137 
7136 
7139 
7140 
7141 
7142 
7143 
7144 
7145 

7146 016366 
016366 
016370 
016372 

7147 016374 
7146 016400 
714« 016404 

016404 



Y05.02 rienday 07 -Oct -05 16:57 P*9* 161 



SEQ 01S9 



S8ETEST:SUBTST <<CHECK FOR SBE FREE LKATIONS>> 
CHECK FOR S8E FREE LOCATIONS 



lASUBTEST 



7150 
7151 
7152 



7153 
71S4 
7155 



7160 
7161 

'An 

7164 
7165 



016412 
016414 
016416 
016416 
016420 
016422 
016424 
0i:>426 
016430 

016432 
016434 
016494 
0164S6 
016440 
016442 
016444 
016446 



010046 
010146 
010446 

013701 002412 
013704 002414 

053737 002552 177776 

104424 
104471 

005011 
005014 
005711 
001107 
005714 
001105 

104503 

005011 
005014 
005711 

001076 



IN ORDER TO DETERMINE IF A LOCATION IS S8E FREE I 00 THIS 

URITE ZEROS UITH ECC DISABLE 

READ ZEROS BACK 

IF NOT ZEROS THEN RETURN ERROR 

URITE ZEROS UITH ECC ENABLED BUT TRAPS DISABLED 

READ ZEROS BACK 

IF NOT ZEROS THEN RETURN ERROR 

TEST THE LOCATION FROH THE PAR'S (UITH NO PROGRAH FETCHES) 
IF THERE UERE ANY SBE'S OR OBE'S THEN RETURN ERROR 

COHPLIMENT ZEROS TO ONES UITH ECC DISABLE 
READ ONES BACK 

IF NOT ONES THEN RETURN ERROR 

URITE 100.. 100000, 00000 (CHECKBITS COnPLIHENT OF BEFORE) 

UITH ECC ENABLED BUT TRAPS DISABLED 
TEST THE LOCATION FROM THE PAR'S (UITH NO PROGRAM FETCHES) 
IF THERE UERE ANY SBE'S OR OBE'S THEN RETURN ERROR 

IF NONE OF THE ABOVE FORCES A RETURN ERROR THEN RETURN NO. ERROR 
ENABL LSB 

PUSH R0.R1.R4 iPUSH R0.R1.R4 ONTO STACK 

NOV RO.-(SP) 
MOV Rl.-(SP) 
NOV R4.-(SP) 



MOV TESTAOO.Rl 
MOV TESTA0O«2.R4 
TESTAREA 

BIS TESTMOOE.PSU 
.OSABL CRF 
CACHOFF 
ECCIOIS 

aEAR (R1).(R4) 



s ENTER TEST MODE 

iGO TO SYSTEM TEST MODE 



I TURN CACHE OFF 

.-DISABLE ECC ON 1 SELECTED CSR 



TST 
BNE 
TST 
BNE 

CLRICSR 
aEAR 



(Rl> 
SBENT 
4) 

^ >ENT 



(R1).(R4) 



aR 



(Rl) 
(R4) 



I CLEAR 1 SELECTED CSR 



016450 104510 



TST 

mm 

TST 
TSTRCAO 



(Rl) 

SKNl 

CM) 



aR 
aR 



(Rl) 
(R4) 



I TEST LK (Rl) e TST FOR 



(UITMOUT FETCHES) 



7166 



7167 

7160 
7169 
7170 
7171 
7172 



7173 

71 74 
7175 
7176 
7177 
7178 
7179 
7180 
7181 
7182 
7185 
7184 
7185 
7186 
7187 
7188 
7189 
7190 
7191 



7192 

7195 
7194 
7195 
7196 
7197 



7196 

7199 
7200 
7201 
7202 
7205 



7204 
7205 



016452 
016452 
016460 
016462 
016462 
016470 
016472 
016476 
016502 
016506 
016506 
016512 
016514 
016514 
016514 
016516 
016520 
016522 
016526 
016550 
016554 

016556 
016540 
016542 
016546 
016550 
016552 
016556 

016S60 
016562 
016562 
016570 
016572 
016572 
016600 
016602 
016606 
016612 
016616 
016616 
016622 
016624 
016624 

016624 
016626 
016650 
016652 
016652 
016654 
016636 
016640 
016640 
016642 



052757 
001415 

012757 
104512 

015700 
072027 
042700 

025700 
001454 



104471 
005111 
005114 
025711 
001046 
C23714 
001045 

104503 
005011 
012714 
005711 
001055 
022714 
001052 

104510 

052757 
001415 

012757 
104512 
015700 
072027 
042700 

025700 
001410 



104417 
104475 
104425 

012604 
012601 
012600 

000241 
000207 



100020 002150 



177777 002066 
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IF «eiT15!BIT4 SET. IN CSR 



SEQ 0170 



002460 
177774 
177600 

002102 



SET SKPERR 
ERRGEN 

MOV ElRRAOO.RO 

ASH «-4.R0 

BIC ♦tC177.R0 

IF BANK EQ RO THEN GOTO SBENT 



END I OF IF MITIS 



BIT ♦BIT15!BIT4.CSR 
BEQ LI 54 

lOISABLE ERRGEN* S ERROR PRINTOUT 

MOV «-l. SKPERR 



CHP BANK.RO 
BEQ S8ENT 



002614 
002614 

100000 
100000 

100020 002150 



177777 002066 

002460 
177774 
177600 

002102 



ECCIOIS 

COM 

COM 

CMP 

BNE 

CMP 

BNE 

CLRICSR 

CLR 

MOV 

TST 

BNE 

CMP 

BNE 

TSTREAD 



(Rl) 
(R4) 

ONES.(Rl) 
SBENT 
0NES.CR4) 
SBENT 



(Rl) 

♦6IT15.(R4) 

(Rl) 
SBENT 

«BIT15.(R4) 
SBENT 



L154: I > i i I I 
s DISABLE ECC ON 1 SELECTED CSR 



i CLEAR 1 SELECTED CSR 



IF «6IT15!BIT4 SET. IN CSR 

SET SKPERR 
ERRGEN 

MOV ERRADD.RO 

ASH *-4,R0 

BIC #tC177.R0 

IF BANK EQ RO THEN GOTC SBENT 

END: OF IF •BIT15 



KERNEL 

ECCIINIT 

CACHON 

POP R4,R1.R0 



jTEST LOC (Rl) £ TST ""OR SBE (WITHOUT FETCHES) 



BIT ♦6IT15!flIT4.CSR 
BEQ LI 55 

:DISAULe ERRGEN' S FRROR PRINTOUT 

MOV 4-1. SKPERR 



CMP BANK.RO 
BEQ SBENT 



L15S: 



; > : s I 



tRETURN NOERROR 



ENTER KERNEL MODE 

INITIALIZE 1 SELECTED CSR 

TURN CACHE ON 

POP RO.Rl £ R4 FROM STACK 

MOV (SP)«.R4 
MOV (SP)..R1 
MOV (SP)«.RO 

CLC 

RTS PC 



CVMJ*B0 MSVll J KMOR* OlAG. 
CHECK rOR StC f9E£ LOCATIONS 
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SEQ 0171 



7^o7 



7208 
7209 
7210 
7»ll 



7212 
7215 



016644 
016646 
016646 
016650 
0)6652 
016654 
016656 
016660 
016660 
016662 
016664 
016666 
C 16666 
016670 



104503 

005011 
005014 
104417 
104475 
10442S 

012604 
012601 
012600 

000261 
000307 



SBENT: CLRICSR 

CLEAR (R1).(R4) 



KERNEL 

ECCIINIT 

CACHON 

POP R4,R1.R0 



IRE TURN ERROR 
.OSABL LSB 



i CLEAR 1 SELECTED CSR 

CLR (Rl) 
CcR (R4; 

ENTER KERNEL noOE 

INITIALIZE 1 SELECTED CSR 

TURN CACHE ON 
sPOP RO.Rl & R4 FRO^I STACK 

MOV (SP)».R4 
MOV (SP)..Rl 
MOV (SP)..RO 

SEC 

RTS PC 



CVHJA80 H3VII-J MtnOBt OI»C. 
CHECK FOA SSE rnCC LOCATIONS 

7216 01M72 



7217 



7210 
7219 
7220 
7221 
7222 
7223 
7224 
722S 
7226 
7227 
7220 
7229 
7250 
7251 
7252 
7255 
7254 
7255 
7256 
7257 
7256 
7259 
7240 
7241 
7242 
7245 
7244 
7245 
7246 
7247 
7246 
7249 
7250 



7251 



016672 
016672 
016674 
016676 



016702 020110 



016704 
016706 
016710 
016712 
016714 
016716 
016720 
0167;>2 
016724 
016726 
016750 
016752 
016754 
016756 
016740 
016742 
016744 
016746 
016750 
0167S2 
016754 
016756 
016760 
016762 
016762 
016762 
016764 
016766 
016770 



025712 
020242 
C25772 
025446 
020544 
025510 
025546 
025626 
025662 
024022 
024052 
020206 
024106 
024106 
024106 
024106 
024106 
024106 
024106 
024106 
024106 
024106 
024106 



062616 
015646 
004756 
000207 
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CSRCASE : SUBTST <<CSR PATTERN CASE STATEnENT>> 



SEQ 0172 



(•SUBTEST 



CSR PATTERN CASE STATEMENT 



010046 
006516 

004757 016' 62 



MKCSRT : 



CASE RO 



{WARNING IF YOU CHANGE THIS TABLE ALSO 

(CHANGE -$00U0" - "$00U5- (THE PATTERN BIT HAP) 



MOV RO,-(SP) 
ASL 8SP 
JSR PC. L 156 



jPAT 
MT0006 

( 
I 

MT0044 

MT0014 
MT0045 
MT0036 
MT0020 
MT0057 
MT0041 
MT0042 
MT0045 
MT0046 
MT0047 
MTOOlO 
MT0999 
MT0999 
MT0999 
MT0999 
MT0999 
MT0999 
MT0999 
MT0999 
MT0999 
HT0999 
MT0999 
END (OF CASE 



RETURN 



TIME 
s<l SEC 



DESCRIPTION 
INITIAL DATA TEST 



MSVll-J ECC TESTS 



SEC 
SEC 



(<1 SEC 

{ 1 SEC 

: 1 SEC 

;<1 SEC 

i 1 SEC 

s<l SEC 

:<1 SEC 

( I SEC 

(<1 SEC 
(<1 
( 0 



RO 



SEC 
SEC 
SEC 
SEC 
SEC 
SEC 
SEC 
SEC 
SEC 
SEC 
SEC 
SEC 



SHIFTING 1/0' S THROUGH CHECK BITS 
BASIC DOUBLE ERROR TEST 

SYNDROMES TO CSR ON DOUBLE BIT ERROR TEST 
CORRECTION CODE TEST 

SYNDROMES TO CSR ON SINGLE BIT ERROR TEST 
ECC DISABLE TEST 

ADDRESS TO CSR ON DOUBLE BIT ERROR 
EXTENDED ADDRESS TO CSR ON ERROR TEST 
URITE BYTE CLEARS SBE TEST 

CHECK SINGLE BIT ERRORS UITH ECC DISABLED TEST 

NO CSR UPDATE ON SBE UITH EXSISTING 06E 

BYTE ADDRESSING TEST 

NULL TEST 

NULL TEST 

NULL TEST 

NULL TEST 

NULL TEST 

NULL TEST 

NULL TEST 

NULL TEST 

NULL TEST 

NULL TEST 

NULL TEST 

L156: ({::({ 

ADD (SP)*.8SP 
MOV a(SP)*.-(SP) 
JSR PC.a(SP)* 



CvnjAeo nsvii-J nenoftY oiac. 

CSR PATTERN CASE STATEMENT 
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SEQ 0175 



7254 


016772 








7255 


016772 










016 772 


032777 


000001 


163636 




017000 


001003 








017002 


005737 


002350 






017006 


001402 








017010 








7256 


017010 


104470 






7257 


017012 










017012 


000401 








017014 








7256 


017014 


104502 






7259 


017016 










017016 








7260 


017016 


012737 


000002 


002076 


7261 


017024 


012737 


000002 


002326 


7262 


017032 


C13700 


002112 




7263 


017036 


006300 






7264 


017040 










017040 


026027 


017132 


023234 




017046 


001405 








017050 


026027 


017132 


024106 




017056 


001401 






7265 


017060 


104511 






7266 


017062 










017062 








7267 


017062 


010637 


002146 




7266 


017066 


162737 


000002 


002146 


7269 


017074 


004770 


017132 




7270 


017100 










017100 


032777 


000001 


163530 




017106 


001003 








017110 


005737 


002350 






017114 


001402 








017116 








7271 


017116 


104506 






7272 


017120 










017120 


000401 








017122 








7273 


017122 


104472 






7274 


017124 










017124 








7275 


017124 


005037 


002076 




7276 


017130 


000207 







MKTEST: SUBTST 



t *SUBTEST 



<<SOBR tec TEST DISPATCH>> 
SUBR ECC TEST DISPATCH 



IF *SUO SET. IN 8SUR OR ACTFLAG IS TRUE 

BIT tSUO.BSUR 

BNE L137 
TST ACTFLAG 
BEQ L140 

L137: I 1 1 i 1 1 

ECCDIS I DISABLE ERROR CORRECTION 

ELSE 

BR L141 
L140: 1 i 1 1 ( i 

CLRCSR i CLEAR ALL CSR'S 

END :0F IF 

L141: 1 1 i i i t 

MOV «2.N0PAR ; INDICATE PARITY ACTION 

MOV ♦2.PCBUMP , TRAPS ADO 2 TO PC 

MOV PATTERN.ro I get PATTERN NUMBER 

ASL RO (MAKE IT A WORD ADDRESS 

IF MKPATCRO) NE «MT0034 AND MKPAT(RO) NE «MT0999 

CMP MKPATCR0).«NT0034 
BEQ L142 

CMP MKPAT(R0),«HT0999 
BEQ L142 

s INVALIDATE BACKGROUND PATTERN ON "BAMC 



7277 
7278 
7279 
7280 
7261 
7282 
7263 
7264 
7285 
7266 



017132 
017132 
017134 
017136 
017140 
017142 



023234 
020322 
020144 
017432 
017526 



MKPAT : 



INVALIDATE 
END jOF IF MKPATCRO) 



MOV 
SUB 
CALL 



SP.CTLKVEC 
♦2.CTLKVEC 
SMKPATCRO) 



L142: i : : ; I i 
:SAVE VECTOR IN CASE OF tK 



; INDEX OFF TABLE 
IF «SUO SET. IN aSUR OR ACTFLAG IS TRUE 

BIT •SU0.8SWR 
BNE L143 
TST ACTFLAG 
BEQ L144 

L143: : i ; ; : i 

ENASBE :TRAP ON SINGLE BIT ERRORS 

ELSE 

BR L145 
L144: { is::: 

ECCINIT :TRAP ON DOUBLE BIT ERRORS (NORMAL) 

END :0F IF «SUO 

L145: ; : i : I : 

CLR NOPAR (INDICATE PARITY ACTION 

RETURN 

•WARNING IF YOU CHANGE THIS TABLE ALSO 
:CHANGE "♦DDUO" - "♦ODUS" (THE PATTERN BIT MAP) 
J PAT TIME OISCRIPTION 
J NOTE MT0034 MUST BE FIRST 6 LAST 

MT0034 s<l SEC iSOFT ERROR - BACKGROUND PATTERN TEST 

MT0017 j<l SEC iHOLDING I'S 6 O'S TEST 

MT0007 ]<1 SEC {ADDRESS BIT TEST 

MTOOOl t<l SEC I ADDRESS TEST 

MT0002 i<l SEC i COMPLEMENT ADDRESS TEST 



CvnjAeo nsvii-j rcnoRr oiag. 
SUBR ECC TEST DISPATCH 

7287 017144 017756 

72S6 017146 020026 

7289 017150 020424 

7290 017152 020714 

7291 017154 021220 

7292 017156 021012 

7293 017160 022342 

7294 017162 022532 

7295 017164 023046 

7296 017166 023234 
7297 

7298 017170 024106 

7299 017172 024106 

7300 017174 024106 

7301 017176 024106 

7302 017200 024106 

7303 017202 024106 

7304 017204 024106 

7305 017206 024106 

7306 017210 C24106 



Y05.02 nonday 07 Oct -65 16:57 



P»g« 165 1 



SCO 0174 



MT0004 


t 1 


SEC 


jftOTATING ZEROS TEST 


MT0005 


: 1 


SEC 


(ROTATING ONES TEST 


HT0021 


> 1 


SEC 


1 MARCHING O'S £ I'S TEST 


MT0022 


:10 


SEC 


(REFRESH e SHIFTING DIAGONAL TEST 


nT0026 


»<1 


SEC 


(RANDOM DATA TEST 


MT0024 


!20 


SEC 


(FAST GALLOPING PATTERN TEST 


MT0031 


: 3 


SEC 


(SOe-A-LONG TEST 


MT0032 


;<1 


SEC 


(WRITE RECOVERY TEST 


MT0033 


1 35 


SEC 


(BRANCH GOBBLE TEST 


MT0034 


«<1 


SEC 


(SOFT ERROR - BACKGROUND PATTERN TEST 


(NOTE HT0034 MUST 


BE FIRST £ LAST 


MT0999 


i 0 


SEC 


(NULL TEST 


MT0999 


t 0 


SEC 


(NULL TEST 


HT0999 


I 0 


SEC 


(NULL TEST 


m0999 


J 0 


SEC 


(NULL TEST 


MT0999 


1 0 


SEC 


(NULL TEST 


MT0999 


> 0 


SEC 


(NULL TEST 


MT0999 


1 0 


SEC 


(NULL TEST 


MT0999 


! 0 


SEC 


(NULL TEST 


ttT0999 


; 0 


SEC 


(NULL TEST 



cvnjAeo nsvii-j MEnoRY ciag. 

SUBR ECC TEST DISPATCH 
7309 017212 



7310 
7311 
7312 
7313 
7314 
7315 
7316 



7317 
7318 

7319 
7320 
7321 
7322 
7323 
7324 
7325 
7326 
7327 
7328 
7329 
7330 
7331 
7332 
7S3S 
7334 
7335 
7336 
7337 
7338 
7339 
7340 
7341 
7342 
7343 
7344 
7345 
7346 
7347 
7S4S 
7349 
7350 
7351 
7352 
7353 
7354 



017212 
017220 
017226 
017254 
017242 
017246 
017250 
017250 
017256 
017260 
017266 
017270 
017272 
017272 
017272 
017276 
017304 
017310 
017314 



017316 
017316 
017320 
017322 
017324 
017326 
017330 
017332 
017334 
017336 
017340 
017342 
017344 
017346 
017350 
017352 
017354 
017356 
017360 
017362 

017364 
017366 
017370 
017372 
017374 



012737 
012737 
012737 
012737 
013700 
006300 

026027 
001405 
026027 
001401 
104511 



010637 
162737 
004770 
005037 
000207 



023234 
020110 
020322 
020144 
017432 
017526 
017642 
017756 
020026 
020424 
02SSS4 
020714 
020746 
021220 
021012 
022342 
022532 
023046 
023234 

024106 
024106 
024106 
024106 
024106 
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MJTEST: SU8TST <<SUBR PARITY TEST DISPATCM>> 



SEQ 0175 



(♦SUBTEST 



SUBR 



PARITY TEST DISPATCH 



000002 
000002 
060000 
060002 
002112 



017316 
017316 



002146 
000002 
017316 
002076 



002076 
002326 
002412 
002414 



023254 
024106 



002146 



MJPAT I 



{INDICATE PARITY ACTION 
(TRAPS ADD 2 TO PC 



nOV •2.N0PAR 

nov «2.PCBur«> 

NOV ♦FIRST, TEST ADD 

nov •FIRST » 2. TEST ADD* 2 

MOV pattern.ro 

ASL RO 

IF njPAT(RO) NE •f1T0034 AND flJPATCRO) NE •t1T0999 



iGET PATTERN NUMBER 
{MAKE IT A UORD ADDRESS 



INVALIDATE 
END I OF IF MJPAT (RO) 

MOV SP.CTLKVEC 

SUB «2.CTLKVEC 

CALL 8MJPAT(R0) 

CLR NOPAR 
RETURN 



CMP MJPAT CR0).#MT0054 
BEQ L146 

CMP MJPAT(R0).#MT0999 
BEQ L146 

(INVALIDATE BACKGROUND PATTERN ON "BANK" 

L146: (((({{ 
(SAVE VECTOR IN CASE OF tK 

{INDEX OFF TABLE 
(INDICATE PARITY ACTION 



(UARNING IF YOU CHANGE THIS TABLE ALSO 

{CHANGE "IDDUO" - "IDDUS" (THE PATTERN BIT MAP) 



(PAT TIME 
{NOTE MT0034 MUST 



MT0034 
MT0006 
MT0017 
MT0007 
MTOOOl 
MT0002 
MT0003 
MT0004 
MT0005 
MT0021 
MT0035 
MT0022 
MT0023 
MT0026 
MT0024 
MTOOSl 
MT0032 
MT00S3 
MT0034 



{<1 SEC 

{<1 SEC 

(<1 SEC 

(<1 SEC 

(<1 SEC 

(<1 SEC 

{ 1 SEC 



SEC 
SEC 
SEC 



{<1 SEC 

(10 SEC 

(10 SEC 

(<1 SEC 

(20 SEC 

> 3 SEC 

:<1 SEC 

(35 SEC 

(<l SEC 



(NOTE MT00S4 MUST 



MT0999 
MT0999 
MT0999 
MT0999 
MT0999 



0 
0 
0 
0 
0 



SEC 
SEC 
SEC 
SEC 
SEC 



OISCRIPTION 
BE FIRST £ LAST 

(SOFT ERROR - BACKGROUND PATTERN TEST 
(INITIAL DATA TEST 
(HOLDING I'S e O'S TEST 
{ADDRESS BIT TEST 
(ADDRESS TEST 
{COMPLEMENT ADDRESS TEST 
(3 XOR 9 WORST CASE NOISE TEST 
(ROTATING ZEROS TEST 
(ROTATING ONES TEST 
(MARCHING O'S C i'S TEST 
UORSE CASE NOISE PARITY TEST 
REFRESH TEST 
SHIFTING DIAGONAL TEST 
RANDOM DATA TEST 
FAST GALLOPING PATTERN TEST 
SOB-A-LONG TEST 
WRITE RECOVERY TEST 
(BRANCH GOBBLE TEST 

(SOFT ERROR - BACKGROUND PATTERN TEST 
BE FIRST L LAST 
(NULL TEST 
(NULL TEST 
NULL TEST 
NULL TEST 
NULL TEST 



cvnjABO nsvii 

PATTERNS 

7356 
7357 
7350 

7359 017376 



-J MEnORY OIAG. 



7360 
7561 
7362 
7563 
7364 
736S 
7366 
7567 



7366 
7569 
7570 
7571 
7572 
7575 
7574 
7575 
7576 
7577 
7576 
7579 
7560 
7561 
7562 
7585 
7564 



7565 
7566 
7587 
7588 
7589 
7590 
7591 
7592 
7595 
7594 
7595 
7596 
7597 
7598 
7599 
7400 
7401 
7402 
7405 



017576 
017402 
017406 
017412 
017416 
017424 
017450 
017452 



017452 
017440 
017444 
017450 
017454 
017456 
017464 
017466 
017470 
017476 
017500 
017504 
017S06 
017512 
017520 
017524 
017526 



017526 
017554 
017540 
017544 
017550 
017554 
017560 
017562 
017570 
017572 
017574 
017602 
017604 
017610 
017614 
017620 
017624 
017626 
017654 



005037 
012700 
012701 
004757 
012757 
004757 
000207 



012757 
C12700 
012701 
005757 
001005 
025757 
001007 
000404 
025757 
001002 
012701 
005002 
00*757 
012757 
004757 
000207 



012757 
012700 
012701 
012704 
012705 
005737 
001005 
025757 
001015 
000404 
025757 
001006 
012701 
012700 
012705 
012702 
010105 
012757 
004757 



002300 
060000 
040000 
052556 
024526 
024334 



000001 
060000 
040000 
002456 

172252 



177652 

050000 

052356 
024552 
024554 



000002 
160000 
040000 
06C000 
100001 
002456 

172252 



1/7652 

050000 
140000 
120001 
000001 

024604 
024554 
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. SBTTL PATTERNS 



SEQ 0176 



.SBTTL 
riTOOOO: SUBTST 



MEnORY TEST SETUP ROUTINES 

<<nTOOOO SETUP DATA PATTERN TEST>> 



i*SUBTEST 



002262 

002500 

172254 
177654 

002262 



CLR 
MOV 
MOV 
CALL 
MOV 
CALL 
RETURN 
MTOOOl: SUBTST 



MTOOOO SETUP DATA PATTERN TEST 

I SETUP PATTERN NUMBER FOR TYPCOUT € DISPLAY 



REALPAT 
«FIRST.RO 
4SIZE.R1 
REGCOPY 

«»1TP000.SUP00AD0 
SUPD05 



I ELSE DO PATTERN IN MAIN NEHORY 



!*SUBTEST 



MOV 
MOV 
MOV 
TST 
BNE 
CMP 
BNE 
BR 

21: CMP 
BNE 

51 : MOV 
41: CLR 

CALL 
MOV 
CALL 
RETURN 
MT0002: SUBTST 



<<MT0001 SETUP ADDRESS TEST>> 

MTOOol SETUP ADDRESS TEST 

I SETUP PATTERN NUMBER FOR TYPEOUT € DISPLAY 



«1. REALPAT 
♦FIRST. RO 
4SIZE.R1 
NOSUPER 
2t 

SIPARS.SIPAR6 

41 

51 

UIPAR5.UIPAR6 
41 

450000, Rl 
R2 

REGCOPY 

«MTP001.SUPD0AD0 
SUP003 



sSET UP CALLING ADDRESS 



i*SUBTEST 



002300 



<<MT0002 SETUP COMPLEMENT ADDRESS TEST>> 

MT0002 SETUP COMPLEMENT ADDRESS TEST 

I SETUP PATTERN NUMBER FOR TYPEOUT fi DISPLAY 



172254 
177654 



21: 
31: 

4$: 



002262 



nOV •2. REALPAT 

MOV •LAST«2.R0 

nOV *SIZE.R1 

MOV 4FIRST.R4 

MOV 4100001. RS 

TST NOSUPER 

BNE 21 

CMP SIPARS.SIPAR6 

BNE 41 

BR 31 

CMP UIPARS,UIPAR6 

BNE 4$ 

MOV 430000. Rl 

MOV •140000.ro 

MOV 4120001.R5 

nov 41. R2 

NOV Rl.RS 

MOV 4MTP002.SUPD0AD0 

CALL SUPD03 



:SET UP CALLING ADDRESS 



CVHJABO riSVll J nenORY OIAG. MACRO Y05.02 
HT0002 SETUP COMPLEMENT ADDRESS TEST 

7404 017640 000207 



Monday 07 -Oct -85 16:5/ P 



RETURN 



188-1 



SEQ 0177 



7407 017642 



MT0003: SUBTST <<MT0003 



SETUP 3 XOR 9 UORST CASE NOISE TEST>> 



7408 



7409 
7410 
7411 
7412 
7413 
7414 
7415 
7416 
7417 
7418 
7419 
7420 
7421 
7422 
7423 
7424 
7425 
7426 
7427 



017642 
017642 
017646 
017650 
017652 
017652 
017660 
017664 
017670 
017674 
017700 
017704 
017710 
017714 
017716 
017724 
017730 
017732 
017740 
017744 

017752 
017754 



005737 
001401 
000207 



i*SUBTEST 



MT0003 SETUP 3 XOR 9 UORST CASE NOISE TEST 



002132 



IF EQFLAG IS TRUE THEN (RETURN 



012737 


000003 


002300 




MOV 


*3.REALPAT 


005037 


002326 






CLR 


PCBUMP 


004737 


032366 




1): 


CALL 


FLIPUARN 


012701 


060000 




21: 


MOV 


•FIRST, Rl 


012703 


020000 






MOV 


«20000.R3 


072327 


177770 






ASH 


♦-8. .R3 


012702 


000004 






MOV 


«4,R2 


012705 


000100 






MOV 


«64. .R5 


104415 








SAVREG 




012737 


024636 


002262 




MOV 


«MTPA03.SUPD0ADD 


004737 


024334 






CALL 


SUPD03 


104416 








RESREG 




012737 


024676 


002262 




MOV 


«MTPB03,SUPD0ADD 


004737 


024350 






CALL 


SUPD04 


022737 


000003 


002616 


4$: 


CMP 


«3.FLIPL0C 


001344 








BNE 


11 


000207 








RETURN 





TST EQFLAG 
BEQ L147 

RTS PC 
L147:Miiii 
(SETUP PATTERN NUMBER FOR TYPEOUT 6 DISPLAY 
{TRAPS DO NOT ADO TO PC 
(SETUP UARNING CONSTANTS £ R2 
(Rl <-- STARTING ADDRESS 

(R3 <-- R3 / 256. 
(SMALL LOOP SIZE 
(MEDIUM LOOP SIZE 



(DO IT IN MAIN MEMORY 



DONE WITH 4 PATTERNS 

[CO. 177777) ((177777.0) ((401. I77777)i(l77777,40l) J? 

NO - LOOP 



CVnjMO nSVll-J MEnORY DIAG. fMCRO Y05.02 
nT0002 SETUP COnPLEMENT ADDRESS TEST 
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SEQ 0178 



7428 017756 



f1T0004: SUBTST 



7429 
7430 
7431 
7432 
7433 
7434 
7435 
7436 
7437 
7438 



7439 
7440 
7441 
7442 
7443 
7444 
7445 
7446 
7447 
7448 
7449 



017756 
017764 
017772 
017776 
020002 
020006 
020012 
020020 
020024 
020026 



020026 
020034 
020042 
020044 
020050 
020054 
020060 
020066 
020074 
020100 
020106 



012737 
012737 
013702 
004737 
012700 
012701 
012737 
004737 
000207 



012737 
C12737 
005002 
004737 
012700 
012701 
012737 
012737 
004737 
012737 
000207 



000004 002300 

000004 002326 

002614 

032516 

060000 

040000 

024774 002262 
024350 



000005 
000004 

032516 
060000 
040000 
025050 
025064 
024350 
025010 



002300 
002326 



002262 
025046 

025046 



t*SUeTEST 



<<hT0004 SETUP ROTATING ZEROS TEST>> 

nT0004 SETUP ROTATING ZEROS TEST 



nov 
nov 
nov 

CALL 

nov 
nov 
nov 

CALL 
RETURN 
nT0005: SUeTST 



•4.REALPAT 
♦4,PCBUriP 

0NES.R2 
BACKGNO 
•FIRST. RO 
«SIZE.R1 

«nTPA04.SUPOOAOO 
SUP004 

<<nT0005 



(SETUP PATTERN NUMBER FOR TYPEOUT C DISPLAY 
I TRAPS ADD 4 TO PC 

:URITE BACKGROUND OF ONES 
I SET UP LINKS 
FlUP ROTATING ONES TEST>> 



l*SUBTEST 



nT0005 SETUP RO'A^ING ONEC TEST 



nov «5.REALPAT 

nov «4.PCBunp 

CLR R2 

CALL BACKGND 

nov ♦FIRST. RO 

nov *SIZE.R1 

nov «nTP005.SUPD0ADD 

nov «nTP005*14.nTPB04*16 

CALL SUP004 

nov «nTPA04*14.nTPB04*16 
RETURN 



t SETUP PATTERN NUMBER FOR TYPEOUT C DISPLAY 
•.TRAPS ADD 4 TO PC 

sURITE BACKGROUND OF ZEROS 
:SET UP LINKS 

: RESET TEST'S ORIGINAL VALUE 



cvnjAeo nsvii-j nenoRY 

riTOOOS SETUP ROTATING 
7452 020110 



OIAC. riACRO 
ONES TEST 



Y0S.02 nenday 07 -Oct -85 16:57 Page 192 

nT0006: SUBTST <<nT0006 SETUP INITIAL DATA TEST»> 



SEQ 0179 



J •SUBTEST 



MT0006 SETUP INITIAL DATA TEST 



7453 
7454 
7455 
7456 
■'457 
7458 
7459 



020110 
020116 
020124 
020130 
020136 
020142 
020144 



012737 
012737 
012701 
012737 
004737 
000207 



000006 002300 
000004 002326 
002412 

025104 002262 
024334 



NOV 
NOV 
MOV 
NOV 
CALL 
RETURN 
MT0007: SUBTST 



•6.REALPAT 
♦4.PCBUMP 
•TEST ADO. Rl 
•t1TPO06.SUPD0A0D 

SUPD03 



(SETUP PATTERN NUMBER FOR TYPEOUT C DISPLAY 
, TRAPS ADD 4 TO PC 



j*SUBTEST 



J DO IT IN i'lPER VISOR NODE 
<<HT0007 SETUP ADDRESS BIT TEST>> 

MT0007 SETUP ADDRESS BIT TEST 



"•460 


020144 


012737 


000007 


002300 


NOV 


♦7.REALPAT 


J SETUP PATTERN NUMBER FOR TYPEOUT C DISPi 


7461 


020152 


005002 






CLR 


R2 


7462 


020154 


004737 


032516 




CALL 


BACKGNO 


lOf ZEROS 


7463 


020160 


012701 


060000 




NOV 


•FIRST. Rl 




7464 


020164 


012702 


000001 




NOV 


•1.R2 




7465 


020170 


C50201 






BIS 


R2 Rl 




7466 


020172 


012737 


025304 


002262 


NOV 


•NtP007 . SUPDOADD 




7467 


020200 


004737 


024334 




CALL 


SUPD03 


{DO IT IN SUPERVISOR HOOE 


7468 


020204 


000207 






RETURN 




7469 


020206 








HTOOlO: SUBTST 


<<MT0010 SETUP 


BYTE ADDRESSING TEST>> 



{♦SUBTEST 



MTOOlO SETUP BYTE ADDRESSING TEST 



7470 020206 

7471 020214 

7472 020222 

7473 020226 

7474 020234 

7475 020240 



012737 
012737 
013704 
012737 
004737 
000207 



000010 002300 
000004 002326 
002412 

025404 002262 
024334 



NOV 

NOV 

MOV 

NOV 

CALL 

RETURN 



♦lO.REALPAT 
♦4.PCBUMP 
TEST ADD. R4 
4MTP010. SUPDOADD 
SUPD03 



! SETUP PATTERN NUMBER FOR TYPEOUT C DISPLAY 
; TRAPS ADD 4 TO PC 



:D0 IT IN SUPERVISOR MODE 



CvnjAeo nsvii-j nEMORr oiag. rucftO yos.02 
MTOOIO SETUP arTE ADDRESSING TEST 
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SEQ 0180 



^ A ^ M 

7476 


020242 






7m 79 


020242 








020242 


AAV TV 7 








AA1 AAV 








AAVW7 








AA % AfSA. 












fmoQ 


020230 








A^AOVA. 

U^O^SO 


AAV7Y7 


030 f C* 






AA1 AAI 






0«UcO* 


AAA')A7 






A^A^AX 
UcUcOO 






f 1 


vcv 90 








020266 






7462 


020266 


012737 


000014 002300 


7463 


020274 


004737 


037646 


7464 


020500 








020S00 


012701 


100000 


7465 


020S04 


004737 


032562 


7466 


020910 


004737 


0»S12 


7467 


020314 


004737 


037734 


7466 


020320 


000207 





HT0014: SUBTST <<nT0014 SETUP BASIC DOUBLE BIT ERMW TEST>> 

!*SUBTEST nT0014 SETUP BASIC DOUBLE BIT ERROR TEST 



IF ACTFLAG IS TRUE OR APTFLAG IS TRUE 



IF I PASS NE 60 THEN (RETURN 



ENDi OF IF ACTFLAG 

nOV tM.REALPAT 
CALL MAPKERNAL 
LET Rl :- #100000 

CALL 6ETCSR 
CALL nTP014 
CALL UNHAP 
RETURN 



TST ACTFLAG 
BNE LISO 
TST APTFLAG 
BEQ L151 
L150: 1 1 1 1 1 1 

TST tPASS 
BEQ L152 
RTS PC 
L152: 1 1 1 } 1 1 

L151:iiit>> 
i SETUP PATTERN NUMBER FOR TYPEOUT £ DISPLAY 
iMAP KERNAL SPACE 
I SETUP TEST ADDRESS 

NOV #100000. Rl 
I GET CSR INFO FROM CONFIGURATION TABLE 
I DO BASIC DOUBLE BIT ERROR TEST 
lUNMAP KERNAL SPACE 



CvnjAac nsvil-J nEnORY OIAG. MACRO YOS.02 Monday 07-0ct-8S 16:57 P*o« 
MT0014 SETUP BASIC DOUBLE BIT ERROR TEST 



SEQ 0181 



7491 

7492 020322 



7493 020322 

7494 020330 

7495 020336 

7496 020342 



012737 
012737 
004737 
000207 



000017 
025736 
024334 



002300 
002262 



nT0017: SUBTST 
! •SUBTEST 



nov 

NOV 

CALL 

RETURN 



<<tlT0017 SETUP HOLOINt I S t 0'S>> 

nT0017 SETUP HOL0Ir« I'S C 0' S 

(SETUP PATTERN NUMBER FOR TYPEOUT £ DISPLAY 
I DO IT IN SUPERVISOR MODE 



#17.REALPAT 

#MTP017,SUP00ADD 

SUPD03 



CVnjABO r<jVll-J nEMORY OIAG. 
MTOOIT S£TUP HXOINC I'S 6 O'S 
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SEQ 0182 



74W 


020344 






75O0 


020344 








020344 


005737 


002350 




020350 


001003 






020352 


005737 


002352 




020356 


001404 






020360 






7501 


020360 








020360 


005737 


056724 




020364 


001401 






020366 


000207 






020370 






7S02 


020370 














7505 


«0370 


012737 


000020 002300 


7S04 


^20376 


004737 


037646 


7505 


020402 








020402 


012701 


100000 


750* 


020406 


004737 


032562 


7507 


020412 


004737 


026014 


7508 


020416 


004737 


037754 


750* 


020422 


000207 





nT0020: SUBTST 



i*SUBTEST 



<<nT0020 SETUP SYNDftONES TO CSR ON SINGLE BIT EIWOR>> 

nT0020 SETUP SYNORONES TO CSR ON SINGLE BIT ERMR 



IF ACTFLA6 IS TRUE OR APTFLAG IS TRUE 



IF IPASS NE #0 THEN (RETURN 



END I OF IF ACTFLAG 

NOV •20.REALPAT 
CALL riAPKERNAL 
LET Rl :- 4100000 

CALL GETCSR 
CALL NTP020 
CALL UNNAP 
RETURN 



TST ACTFLAG 
BNE L1S3 
TST APTFLAG 
BEQ L154 

L153: 1 1 1 1 i I 



L155 



TST IPASS 
BEQ L155 
RTS PC 

I i 1 1 1 1 



L154: I 1 1 I i I 
t SETUP PATTERN NUMBER FOR TYPEOUT & DISPLAY 
I HAP KERNAL SPACE 
t SETUP TEST ADDRESS 

NOV •lOOOOO.Rl 
I GET CSR I»FO FROn CONFIGURATION TABLC 
(DO SYNORONES TO CSR ON SINGLE ERROR TEST 
i UNNAP KERNAL SPACE 



CVnjABO nSVll J rCnORY OXAG. macro Y0S.02 Monday 07-0ct-85 16:57 
MT0020 SETUP SYNOROMES TO CSR ON SINGLE BIT ERROR 



7511 020424 



MT0021: SUBTST <<MT0021 



Pag* 199 



SETUP MARCHING O'S £ I'S TEST>> 



SEQ 0183 



7512 

7513 
7514 
7515 
7516 
7517 
7518 
7519 
7520 
7521 
7522 
7523 
7524 
7525 
7526 
7527 
7526 
7529 
7530 
7531 
7532 
7535 
7534 
7535 
7536 
7537 
7538 
7539 
7540 
7541 
7542 
7543 
7544 
7545 
7546 
7547 
7548 
7549 
7550 
7551 
7552 
7553 
7554 
7555 
"'556 
7557 



020424 
020424 
020432 
020440 
020444 
020450 
02C452 
020454 
020460 
020462 
020466 
020474 
020476 
020504 
020506 
020514 
020516 
020522 
020524 
020532 
020534 
020540 
020542 
020550 
020554 
020562 
020566 
020570 
020576 
020602 
020610 
020614 
020616 
020624 
020626 
020632 
020634 
020642 
020646 
020654 
020660 
020662 
020670 
020674 
020702 
020706 
020712 



i*SUBTEST 



MT0021 SETUP MARCHING O'S £ I'S TEST 











SET NOSCOPE 


VAC f f 


177777 


002440 












002SOO 




nuv 


A91 DFAI PAT 


013702 


002632 






nuv 


BAVDAT D3 


004737 


032516 






PAI 1 


RArKftMO 


010203 








MftU 
f lyjw 




000303 








QUAR 


n o 


012701 


160000 






Mnu 

nuv 


M ACT «9 Q1 


010105 










Q1 R^ 
nX • 


012704 


060000 






nii» 


ATTR^T RA 


022737 


000005 


004064 




CMP 


6% PRnTYP 


001450 












022737 


000003 


004064 




CMP 


AT PROTYP 


001407 












022737 


000007 


002102 




CMP 


67 BANK 


001003 








BNE 


31 


012701 


140000 






MOV 


•140000. Rl 


010105 








MOV 


Ri RS 


022737 


000177 


002102 


31 : 


CMP 


#177. BANK 

w A r 9 0 i#r^v«v^ 


001003 








BNE 


5) 


012701 


140000 






MOV 


A140000 Ri 


010105 








MOV 


Rl.RS 


012737 


026330 


002262 


5$: 


MOV 


^TPA2i . SUPDOADD 


004737 


024334 






CALL 


SUP003 


012737 


026360 


002262 




MOV 


«MTPB21 . SUPDOADD 


004737 


024350 






CALL 


SUP004 


010401 








MOV 


R4.R1 


012737 


026414 


002262 




MOV 


•MTPC21 . SUPDOADD 


004737 


024350 






CALL 


SUPD04 


012737 


026450 


002262 




MOV 


M1TPD21 . SUPDOADD 


004737 


024350 






CALL 


SUP004 

*#^^V ^ 


000434 








BR 


2$ 


022737 


000177 


002102 


1$: 


CMP 


•177. BANK 


001003 








BNE 


41 


012701 


140000 






MOV 


•140000. RI 


010105 








MOV 


Rl.RS 


012737 


026330 


002262 


4$: 


MOV 


•t1TPA21 . SUPDOADD 


004737 


024334 






CALL 


SUP003 


012737 


026360 


002262 




MOV 


•MTPB21. SUPDOADD 


004737 


024350 






CALL 


SUP004 


010401 








MOV 


R4.R1 


012737 


026414 


002262 




MOV 


•MTPC21 . SUPDOADD 


004737 


024350 






CALL 


SUPD04 


012737 


026450 


002262 




MOV 


•nTPD21. SUPDOADD 


004737 


0^4350 






CALL 


SUP004 


005037 


002440 




2t: 


CLR 


NOSCOPE 


000207 








RETURN 





MOV ••!, NOSCOPE 
{SETUP PATTERN NUMBER FOR TYPEOUt £ DISPLAY 



ilS THIS AN 11/83 
{BRANCH IF IT IS 
J IS THIS AN 11/24? 
(BRANCH IF SO 



CvnjAeo nsvii-J rcnORr DIAG. 
HT0021 SETUP HMCHING O'S C 1' 



riACRO Y05.02 *1on4«y 07-Oct 85 16:57 Pag* 200 
S TEST 



SEQ 0184 





VcV 9 A* 






1 TOW 




0O4757 


024122 


7561 


020 720 








020720 


103001 






020722 


000207 






020724 






7562 


020724 


012737 


000022 


7563 


020732 


012737 


026500 


7564 


020740 


004737 


024334 


7565 


020744 


000207 




7566 








7567 


020746 







MT0022: SUBTST <<«T0022 



SETUP REFRESH 6 SHIFTING DIAGONAL TEST>> 



.•SUBTEST 



MT0022 SETUP REFRESH t SHIFTING DIAGONAL TEST 



CALL KAhlTEST 
ON.ERROn THEN (RETURN 



002300 
002262 



MOV 
MOV 
CALL 
RETURN 

MT0023: SUBTST 



•22.REALPAT 

*nTP022.SUPD0AD0 

SUPD03 



:*SU6TEST 



<<MT0023 
nT0023 SHIFTING DIAGONAL TEST 



: CHECK FOR KAMIKAZE NODE 
:IF NOT IN KAMIKAZE HOOE RETURN 

BCC L1S6 
RTS PC 
L1S6: 1 1 1 < i i 
i SETUP PATTERN NUMBER FOR TYPEOUT C DISPLAY 

:D0 IT IN SUPERVISOR MODE 
SHIFTING DIAGONAL TEST>> 



'568 


020746 


004737 


024122 




CALL 


KAMITEST 


7569 


020752 








ON. ERROR THEN IRETURN 




020752 


103001 












020754 


000207 












020756 












7570 


020756 


012737 


000023 


002300 


MOV 


•23.REALPAT 


7571 


020764 


012737 


026500 


002262 


MOV 


«MTP022.SUPD0ADD 


7572 


020772 








SET 


DIAGFLAG 




020772 


012737 


177777 


002004 






7573 


021000 


004737 


024334 




CALL 


SUP003 


7574 


021004 


005037 


002004 




CLR 


DIAGFLAG 


7575 


021010 


000207 






RETURN 





i CHECK FOR KAMIKAZE MODE 

:IF NOT IN KAMIKAZE MODE RETURN 

BCC L157 

RTS PC 
L157:,;,,,« 
i SETUP PATTERN NUMBER FOR TYPEOUT £ DISPLAY 

; IDENTIFY DIAGONAL TEST TO MTP022 

MOV «-l. DIAGFLAG 
:D0 IT IN SUPERVISOR MODE 



CVnjA80 MSVll-J MEMORY OIAG. 
MTOOSS SHIFTING OIAGOML TEST 

7577 021012 
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MT0024: SUBTST <<MT0024 SETUP FAS' GALLOPING PATTERN TEST>> 



SEQ 0165 



7578 
7579 



7580 

7581 
7582 
7583 
7584 
7585 
7586 
7587 
7588 
7589 
7590 
7591 
7592 
7593 
7594 
7595 
7596 
7597 
/598 
7599 
7600 
7601 
7602 
7603 
7604 
7605 
7606 
7607 
7608 
7609 
7610 
7611 
7612 
7613 
7614 
7615 



021012 
021016 
021016 
021020 
021022 
021022 
021022 
021050 
021036 
021042 
021046 
021050 
021052 
021054 
021060 
021064 
021072 
021074 
021102 
021104 
021112 
021114 
021120 
021126 
021130 
021134 
021136 
021140 
021146 
021150 
021156 
021160 
021164 
021166 
021174 

021200 
021202 
021204 
021206 
021212 
021216 



004737 024122 

103001 
000207 



012737 
012737 
013702 
004737 
010203 
010S04 
000S04 
012701 
012705 
C22737 
001426 
022737 
001406 
022737 
001002 
012705 
022737 
001003 
012701 
010105 
104415 
012737 
000412 
022737 
001002 
012705 
104415 
012737 
004737 

104416 
000302 
000303 
004737 
005037 
000207 



{•SUBTEST 



nT0024 SETUP FAST GALLOPING PATTERN TEST 



CALL KAMI TEST 

ON. ERROR THEN (RETURN 









SET 


NOSCOPE 


177777 


002440 








000024 


002300 




MOV 


•24.REALPAT 


002632 






MOV 


BAKPAT,R2 


032516 






CALL 


BACKGND 








MOV 


R2.R3 








MOV 


R3.R4 








SUAB 


R4 


060000 






MOV 


•FIRST. Rl 


157776 






MOV 


♦LAST.R5 


000005 


004064 




CMP 


♦5.PR0TVP 








BEQ 


11 


000003 


004064 




CMP 


♦3.PR0TYP 








BEQ 


3» 


000007 


002102 




CMP 


«7.BANK 








BNE 


31 


137776 






MOV 


♦137776, R5 


000177 


002102 


31: 


CMP 


•177, BANK 








BNE 


7» 


137776 






MOV 


•137776, Rl 








MOV 


R1.R5 






7$: 


SAVREG 


027214 


002262 




MOV 


•MTPB24,SUPD0ADD 








BR 


21 


000177 


002556 


11: 


CMP 


•177.LASTB."NK 








BNE 


41 


137776 






MOV 


♦137776, R5 






41: 


SAVREG 




027214 


002262 




MOV 


•MTPB24.SUPD0AD0 


024350 




21: 


CALL 


SUPD04 






tOO IT 


AGAIN FOR COMPLEMf 








RESREG 










SUAB 


R2 








SWAB 


R3 


024350 






CALL 


SUPD04 


002440 






CLR 


NOSCOPE 








RETURN 





•.CHECK FOR KAMIKAZE MODE 

ilF NOT IN KAMIKAZE MODE RETURN 

BCC L160 

RTS PC 
L160: i s > I > i 

MOV ♦1. NOSCOPE 
i SETUP PATTERN NUMBER FOR TYPEOUT C DISPLAY 



DATA 



CvnjABO HSVll-J nEnORY OIAG. riACRO Y0S.02 
HT0024 SETUP FAST CM.LOPZNG PATTERN TEST 



nonday 07 -Oct -65 16:57 Pag* 20S 



SEQ 0186 



7619 021220 



nT0026: SUBTST <<nT0026 



SETUP RANOOn DATA TEST>> 



7619 
7620 
7621 
7622 
7623 
7624 
7625 
7626 
7627 
7626 
7629 
7630 
7631 
7652 
7633 
7654 
7635 
7656 
7637 
7636 
7639 
7640 
7641 
7642 
7643 
7644 
7645 
7646 
7647 
7646 
7649 
7650 
7651 
7652 
7653 
7654 
7655 
7656 
7657 
7656 
7659 
7660 
7661 



021220 
021226 
021232 
0212S6 
021242 
021244 
021246 
021252 
021256 
021264 
021266 
021274 
021276 
021504 
021506 
021512 
021520 
021522 
021526 
021550 
021556 
021544 
021550 
021554 
021562 
021570 
021572 
021376 
021400 
021406 
021410 
021414 
021416 
021424 
021452 
021456 
021442 
021450 
021456 
021460 
021464 
021470 
021474 



012737 
005037 
015705 
015702 
010505 
010204 
012701 
012700 
022757 
001445 
022757 
001406 
022757 
001002 
012700 
C22757 
001002 
012700 
104415 
012757 
012757 
004757 
005057 
012757 
012757 
104416 
004757 
000452 
022757 
001002 
012700 
104415 
012737 
012757 
004757 
005057 
012757 
012757 
104416 
004757 
010557 
010257 
000207 



000026 
002526 
002604 
002602 



060000 
020000 
000005 

000005 

000007 

014000 

000_/7 

014000 

027252 
027246 
024554 
027276 
027266 
027262 

024554 



014000 

027252 
027246 
024354 
027276 
027266 
027262 

024354 
002604 
002602 



.•SUBTEST 



nT0026 SETUP RANOOn DATA TEST 



002500 



004064 
004064 
002102 

002102 



027552 
002262 



027552 
002262 



51: 
7$: 



000177 002102 



027552 
002262 



027352 
002262 



It. 
41: 



2<: 



nov 

CLR 

nov 
nov 
nov 
nov 
nov 
nov 
cnp 

BEQ 

cnp 

BEQ 

cnp 

BNE 

nov 
cnp 

BNE 

nov 

SAVREG 

nov 
nov 

CALL 
CLR 

nov 
nov 

RESREG 

CALL 

BR 

cnp 

BNE 

nov 

SAVREG 

nov 
nov 

CALL 
CLR 

nov 
nov 

RESREG 
CALL 

nov 
nov 

RETURN 



•26.REALPAT 

PCBUnP 

SEE0L0.R5 

SEE0HI.R2 

R3.R5 

R2.R4 

♦PIRST.Rl 

♦SIZE/2. RO 

♦5.PR0TYP 

It 

♦3.PR0TYP 
3t 

•7. BANK 
31 

•14000.ro 
♦177.BANK 
7» 

«14000.R0 

♦nTPA26*4.nTPD26*14 
«nTPA26.SUP00A00 

SUP003 
RANOOD 

M1TPB26 *4 . nTP026 * 14 
«nTPB26.SUP00A00 

SUP003 
21 

«177.BANK 
41 

♦14000. RO 

♦nTP A26 * 4 . nTPD26 * 14 

♦nTPA26.SUP00A0D 

SUP003 

RANOOD 

♦nTPB26 ^4 . nTP026 ♦ 14 
♦nTPB26.SUP00A00 

SUP005 

RS.SEEDLO 

R2,SEE0HI 



(TRAPS 00 NOT ADO TO THE PC 
1 INITIALIZE RANOOn NUMBERS 



I DO UE HAVE AN 11/65 ? 

: BRANCH IF UE 00 

! 11/24? 

i BRANCH IF SO 



:FOR ERROR REPORTING 
sSET UP NEXT LINK 



J FOR ERROR REPORTING 
sSET UP NEXT LINK 



(UPDATE FOR NEW RANDO^' NUNBERS 



cvnjABO nsvii-j memory oiag. 
MT0026 SETUP RANOOn DATA TEST 



7664 


021476 






7665 








7666 








7667 


021476 


012737 


000027 


7666 


021S04 


104502 




7669 


021506 


012737 


024334 


7670 


021514 








021514 


012737 


177777 


7671 


021522 








021522 


012737 


000001 




021530 






7672 


021530 








021530 


005037 


002102 




021534 






7673 


021534 


004737 


037760 


7674 


021540 








021540 


C05737 


002116 




021544 


001436 






021546 


005737 


002124 




021552 


001033 




7675 


021554 


104511 




7676 


021556 








021556 


013702 


002102 


7677 


021562 


012700 


060000 


7678 


021566 


010004 




7679 


U21570 


012701 


040000 


76«0 


021574 


010103 




7661 


('21576 








021576 


023727 


002452 




021604 


001005 




76S2 


021606 


012737 


027572 


76S3 


021614 


004777 


160702 


7664 


021620 








021620 






7665 


021620 








021620 


023727 


002452 




021626 


001005 




76S6 


021630 


012737 


027600 


7687 


021636 


004737 


024334 


7688 


021642 








021642 






7689 


021642 








021642 






7690 


021642 








021642 


005237 


002102 




021646 


023737 


002102 




021654 


003727 






021656 






7691 


021656 








021656 


005237 


002452 




021662 


023727 


002452 




021670 


003717 






021672 






7692 


021672 







HACRO V05.02 Monday 07 -Oct -65 16:57 Pm^m 205 

nT0027: SUBTST <<nT0027 UNIQUE BANK TEST>> 



SEQ 0187 



{•SUBTEST 



nT0027 UNIQUE BANK TEST 



002300 
002522 
002426 
002452 



.MAKE SURE THAT EACH BANK CAN HAVE UNIQUE DATA 

tURITE ANO READ THE BANK NUMBER IN EACH BANK (EXCEPT WHERE inc kHOGRAM IS) 

MOV •27.REALPAT j SETUP PATTERN NUMBER FOR TYPEOUT C DISPLAY 

CLRCSR : CLEAR CSRS 

MOV «SUPD03,LINK1 sSET UP LINK 

SET NOFSMOOE 

MOV *-l. NOFSMOOE 



STAR27: FOR I :- *1 TO «2 

FOR BANK :- «0 TO LASTBANK 



000001 
002262 

000002 
002262 



002556 



000002 



MOV #1.1 
B23: i ; ; i I t 

CLR BANK 

B24 : : i I i : s 



CALL EXBANK 
IF ACFLAG IS TRUE AND RRFLA6 IS FALSE 

TST ACFLAG 

BEQ L161 

TST RRFLAG 

BNE L161 

{INVALIDATE BACKGROUND PATTERN ON "BANK* 



INVALIDATE 
LET R2 :- BANK 

MOV «FIRST,RO 
MOV R0.R4 
MOV *SIZE.R1 
MOV R1.R3 
IF I EQ «1 



MOV «M^P034,SUP00AD0 
CALL SLINK 1 
END ;0F IF 

IF I EQ *2 



MOV «MTP034 *6 . SUPOOADO 
CALL SUP003 
END iOF IF 

END (OF IF 

END I OF FOR BANK 

END :0F FOR I 

IF FS7FLAG IS TRUE 



MOV BANK.R2 



CMP I.#l 
BNE L162 



L162: 



CMP I. #2 
BNE L163 



L163: i : : ; s : 
L161: : t : t : ; 



E24: 



INC BANK 

CMP BANK. LASTBANK 
BLE 624 

i : I s 



INC I 
CMP I. #2 
BLE B23 
E23: i : { i I i : 



CVHJA80 nsvii-j riEnORY OIAC. 

HT0027 UNIQUE SANK TEST 



7693 
7694 
7695 

7696 



7697 



7698 
7699 



7700 

7701 
7702 
7703 
7704 
7705 
7706 



7707 
770)» 
770*J 

/710 



7711 
7712 
7713 

7714 

7715 



7716 



7717 
7718 



021672 
021676 
021700 
021704 
021706 
021706 
021706 
021706 
021714 
021714 
021714 
021722 
021722 
021726 
021726 
021732 
021734 
021740 
021742 
021742 
021746 
021750 
021754 
021756 
021762 
021764 
021764 
021772 
021774 
022002 
022006 
022006 
022006 
022006 
022014 
022016 
022024 
022030 
022030 
022030 
022030 
022030 
022030 
022034 
022042 
022044 
022044 
022044 
022050 
022056 
022060 
022060 
022064 



005737 
001403 
005037 
000207 



013737 

004737 

005737 
001436 
005737 
OOlOSS 

C13702 
005102 
012700 
010004 
012701 
OlOlOS 

023727 
001005 
012737 
004777 



023727 
001005 
012737 
004757 



005337 
023727 
002327 



005237 
023727 
003716 

005037 
000207 



002446 
002426 



012737 000001 



002556 
037760 
002116 
002124 

002102 
060000 
040000 

002452 

027572 
160514 

002452 

027600 
024334 



002102 
002102 



002452 
002452 



002426 



MACRO Y05.02 Monday 07 -Oct -85 16:57 P«g« 205-1 



ClR NOFSnODE 
RETURN 
END ;0F IF FS7FLAG 



SEQ 0188 



002452 
002102 



000001 
002262 

000002 
002262 



000000 



000002 



FOR I :- «1 TO «2 

FOR BANK :- LASTBANK DOUNTO «0 



CALL EXBANK 

IF ACFLAG IS TRUE AND RRFLAG IS FALSE 



LET R2 :- BANK 



con 

MOV 
MOV 
MOV 
MOV 

IF I EQ «1 



R2 

♦FIRST. RO 
R0.R4 
«SIZE.R1 
R1.R3 



TST FS7FLAG 
BEQ L164 



L164: 1 1 1 1 i I 

NOV •l.l 

B25 : i t i ( > t 

NOV LASTBANK, BANK 
B26 : 1 > I i 1 1 



TST ACFLAG 
BEQ L165 
TST RRFLAG 
BNE L165 

NOV BANK.R2 



MOV «nTP034.SUPD0AD0 
CALL SLINKl 
END lOF IF 

IF I EQ «2 



MOV »MTP034*6,SUP00A0D 
CALL SUPD03 
END I OF IF 



CMP I, PI 
BNE L166 



L166: : : 1 1 1 ; 



END iOF IF 
END iOF FOR BANK 

END sOF FOR I 



CLR NOFSMOOE 
RETURN 



CMP I.P2 
BNE L167 



L167 : : : i t i I 
L165: i : ; t : i 

DEC BANK 
CNP BANK.M 
BGE B26 

E26 : i i t i I i I 

INC I 
CMP I. #2 
BLE B25 
E2S : 1 1 1 1 1 1 i 



cvtijASO nsvii-j rcnoRV oiag. 

t1T0027 UNIQUE BANK TEST 



7721 


0220M 








A30AAA 


AA^AX7 

W9Vd f 




7723 


A90*'>70 








A33A73 
Ucc V r C 


ni 97X7 
Ulc r O r 


1 77777 

X 9 t 9 9 9 


' 'C* 


A301 /V% 


M 97X7 






A001 Ail 


ni 97X7 


aaAaai 


r 'cO 


A301 1 A 
Ucc 11* 


Al 97X7 
UlC r O r 


A9AXXA 


1 let 


Ucc Icc 


01 97X7 




77311 
r / CO 


nsdi XA 


1 0AA70 
XV^^ r V 




7790 


Aoai X3 








Aoai xs 


0197X7 
VXC f ^ f 


177777 

X f f « « f 




AOOI AA 


0197S7 

VXC 9 99 


177777 












099 1 Aft 




002102 










77X1 


n991 ^9 


AOA7X7 

9 9 9 




77X3 


0991 VI 
Vcc l^O 








Vccl90 


W J for 


002120 




0991ft9 


wx*x* 




771S 


099164 








099164 


0057S7 


0021 1& 

WC X xv 






001411 








005737 


002124 






001006 








019701 
vxc • vx 


040000 

V^ WW 


77S5 




019700 
vxs ■ w 


060000 

WWW 


r f 




<MM777 

f f f 


1 A0S06 

XWwW 


77S7 


VCCC 








VCCC 






77YA 










VCCC 






77^4 












0052S7 


002102 






0PS7S7 


002102 

WC AWK 


















7 7 AO 












0057S7 


002264 




0222 S4 


001032 




7741 


022216 








02223& 


(11P7S7 

VAC ' W ' 


177777 


77AP 


022244 


104^02 

X^^V JVC 




77AS 


0?224#^ 


004737 

^^^^ f W r 














0222S2 


lOSOlO 

A Vi#V A V 




7745 


022254 


104472 




7746 


022256 








022256 


005057 


002426 




022262 


005037 


002440 




022266 


005037 


002542 


7747 


022272 


000207 




7748 


022274 








022274 






7749 


0222 1h 


013737 


002310 



MACRO Y05.02 Honday 07-0ct-a5 16:57 Pag* 207 

nT0030: SUBTST <<riT0030 SETUP FLUSH OUT OBE'S TEST>> 



SEQ 0189 



i*SUeTEST 



riT0030 SETUP FLUSH OUT OBE'S TEST 



002542 
002300 
002076 
002522 
002262 



002426 
002440 



nTA030: 



002556 



002264 



CLR 
SET 

NOV 
MOV 
MOV 
MOV 
ECCDIS 
SET 



PASFLG 
FULLREL 

♦30.REALPAT 
•l.NOPAR 
♦SUP003.LINK1 
•MTP030,SUPD0AD0 



MOV #-1, FULLREL 
; SETUP PATTERN NUMBER FOR TYPEOUt 6 DISPLAY 
t INDICATE COUNT PARITY ERRORS 



i DISABLE ERROR CORRECTION 



NOFSMODE.NOSCOPE 
FOR BANK :- «0 TO LASTBANK 



CALL EXBANK 

IF MKFLAG IS TRUE 



IF ACFLAG IS TRUE AND RRFLAG IS FALSE 

MOV «5IZE.R1 
MOV ©flRST.RO 
CALL aLINKl 

END lOF I'r ACFLAG 

END ;0F IF MKFLAG 

END iOF FOR 

IF PASFLG IS FALSE 



B27 



I CLEAR CSRS 



MOV « l.NOFSMOOE 
MOV «-l.NOSCOPE 

CLR BANK 

: s i < : > 



TST MKFLAG 
BEQ L170 

TST ACFLAG 
BEQ L171 
TST RRFLAG 
BNE L171 



L171: >::>:• 
L170: St:::: 

INC BANK 

CMP BANK. LASTBANK 
BLE B27 
E27: ::::::> 

TST PASFLG 
BNE L172 

MOV ♦-1. PASFLG 



002102 



SET PASFLG 

CLRCSR 

CALL RELOCATE 
ON. ERROR 

BCC L173 

ECCINIT (TRAP ON DOUBLE BIT ERRORS (NORMAL) 

CLEAR NOFSMODE.NOSCOPE. FULLREL 

CLR NOFSMOOE 
CLR NOSCOPE 
CLR FULLREL 

RETURN 
END :0F ON. ERROR 

L173: : : I : : : 

MOV NEUBANK.BANK 



CVMJA80 MSVll-J MEMORY OIAC. MACRO Y05.02 
MT0030 SETUP FLUSH OUT DBE'S TEST 



Monday 07 Oct -65 16:57 P»g« 207 1 



SEQ 0190 



7750 
7751 
7752 
7753 
7754 
7755 

7756 
7757 



7756 



022302 
022306 
022312 
022314 
022320 
022322 
022322 
022322 
022324 
022324 
022330 
022334 
022340 



004737 
004737 
104472 
004737 
000207 



104472 

005037 
005037 
005037 
000207 



037760 
022100 

037122 



002426 
002440 
002542 



sTRAP ON DOUBLr BIT ERRORS (NORMAL) 



CALL EXBANK 
CALL MTA030 
ECCINIT 

CALL UNRELOCATE 
RETURN 
END I OF IF PASFLG 

L172: : : s i s : 

ECCINIT ;TRAP ON DOUBLE BIT ERRORS (NORMAL) 

CLEAR NOFSMOOE.NOSCOPE.FULLREL 

CLR 
CLR 
CLR 

RETURN 



NOFSMODE 

NOSCOPE 

FULLREL 



I 



CvnjASO nSVll-J MEnORV DIAG. macro Y05.02 
fITOOSO SETUP FLUSH OUT DBE'S TEST 



Monday 07 -Oct -05 16:57 Pao* 209 



SEQ 0191 



7761 022542 



7762 022342 

7763 022346 
022346 
022350 
022352 

7764 022352 
022352 

7765 022360 

7766 022366 

7767 022372 
022372 
022374 
022400 

022404 

7768 022406 
022406 

7769 022414 
022414 
022420 
022422 
022424 



7770 
7771 
7772 
7773 
7774 
7775 
7776 
7777 
7778 
7779 
7780 
7781 
7782 
7783 
7784 
7785 
7786 
7787 



022426 
022430 
022434 
022436 
022442 
022446 
022454 
022462 
022466 
022470 
022476 
022500 
022502 
022510 
022512 
022520 
022524 
022530 



HT0031: SUBTST <<m0031 



SETUP SOB-A-LONG TEST>> 



j*S'JBTEST 



MT0031 SETUP SOB-A-LONG TEST 



004757 024122 

105001 
000207 



012737 
012737 
005037 

010346 
013703 
004737 

012603 

053737 



004537 
000027 
060000 
027364 

104417 

013702 
010200 
012701 
012705 
012737 
012737 
005737 
001005 
023737 
V 01405 
000407 
023737 
001003 
012737 
004737 
005037 
000207 



177777 
000031 
002076 



002102 
035604 



002552 
040732 



002440 
002300 



177776 



CALL KAniTEST 

ON. ERROR THEN IRETURN 



SET 

MOV 
CLR 
MAP 



NOSCOPE 

♦31.REALPAT 

NOPAR 

BANK 



MOV BANK.R3 
CALL MAPPER 
.OSABL CRF 

TESTAREA 

BIS TESTMOOE.PSU 
.OSABL CRF 

BMOV MTP031. FIRST. SOBLENGTH/2 
JSR R5.BL0CK3 
SOBLENGTH/2 



I CHECK FOR KAMIKAZE MODE 

I IF NOT IN KAMIKAZE MODE RETURN 

BCC L174 

RTS PC 
L174: : 1 1 1 1 i 

NOV *-l. NOSCOPE 
i SETUP PATTERN NUMBER FOR TYPEOUT £ DISPLAY 
s SETUP PARITY ACTION 
iMAP FIRST SO BLOCK HOVE UORKS 

MOV R3.-(SP) 



MOV (SP)».R3 

(ENTER TEST MODE 

iGO TO SYSTEM TEST MOOE 



FIRST 
MTP031 
.OSABL 



CRF 









KERNEL 




002572 






MOV 


S0BK.R2 








MOV 


R2.R0 


100776 






MOV 


♦100776.R1 


060056 






MOV 


«FIRST * S06LENGTH . R5 


060002 


002262 




MOV 


«FIRST*2.SUP00AD0 


160000 


002522 




MOV 


«LAST*2.i.INKl 


002456 






TST 


NOSUPER 








BNE 


U 


172252 


172254 




CMP 


SIPARS.SIPAR6 








BEQ 


2t 








BR 


3« 


177652 


177654 


1*: 


CMP 


UIPAR5.UIPAR6 








BNE 


li 


140000 


002522 


21: 


MOV 


*140000.LINK1 


024350 




31: 


CALL 


SUP004 


002440 






CLR 


NOSCOPE 








RETURN 





{ENTER KERNEL MOOE 

! COMPLEMENT OF INSTRUCTION "SOB RO.OOT' 



cvnjABO nsvii-j ncnoRY oiac. 

ilTOOSl SETUP SOe-A-LONC TEST 
7790 022532 



riACRO Y0S.02 nontfay 07-0ct-8S 16:57 Pag* 211 



SEQ 0192 



7791 022532 

7792 022536 
022536 
022540 
022542 

7793 022542 
022542 

7794 022550 

7795 022556 

7796 022562 
022562 
022564' 
022570 



7797 
7796 
7799 
7800 
7601 
7802 
7803 
7804 
7805 
7806 
7807 
7808 
7809 
7810 
7811 
7812 
7813 
7814 
7815 
7816 



022574 
022576 
022602 
022606 
022612 
022616 
022622 
022626 
022632 
022636 
022640 
022646 
022650 
022652 
022660 
022662 
022666 
022672 
022676 

022704 
022704 



7817 






7818 


022712 


010023 


7819 


022714 


010144 


7S20 


022716 


077203 


7821 






7822 


022720 


022737 


7823 


022726 


001003 


7824 






7825 


022730 






022730 


004537 




022734 


027442 


7826 


022736 


104417 


7827 






7828 


022740 


012702 


7829 


022744 


012700 



nT0032: SU8TST <<nT0032 



SETUP WRITE RECOVERY TEST>> 



i*SUBTEST 



nT0032 SETUP URITE RECOVERY TEST 



004737 024122 

103001 
000207 



012737 
012737 
005037 

010346 
013703 
004737 

012603 
C 12700 
012701 
012702 
010237 
012703 
012704 
005037 
005737 
001005 
023737 
001405 
000415 
023737 
001011 
012704 
012702 
010237 
012737 



053737 



CALL KAMITEST 

ON. ERROR THEN (RETURN 







SET 


NOSCOPE 


177777 


002440 






000032 


002300 


MOV 


•32,REALPAT 


002076 




CLR 


NOPAR 






MAP 


BANK 


002102 




MOV 


BANK,R3 


035604 




CALL 


MAPPER 






. OSABL 


CRF 


010247 




MOV 


«10247,R0 


177667 




MOV 


♦177667. Rl 


020000 




MOV 


«SIZE/2.R2 


002522 




MOV 


R2.LINK1 


060000 




MOV 


♦FIRST. R3 






MOV 


♦LAST»2.R4 


002524 




CLR 


LINK2 


002456 




TST 


NOSUPER 






BNE 


1« 


172252 


172254 


CMP 


SIPAR5.SIPAR6 






BEQ 


2« 






BR 


3« 


177652 


177654 1$: 


CMP 


UIPAR5.UIPAR6 






BNE 


31 


140000 


2«: 


MOV 


♦140000. R4 


014000 




MOV 


♦14000. R2 


002522 




MOV 


R2.LINK1 


000001 


002524 


MOV 


♦1.LINK2 




3«: 


TESTAREA 


002552 


177776 


BIS 


TESTMOOE.PSU 






.OSABL 


CRF 






:MOVE 


TEST TO MEMORY UNDER TEST 



I CHECK FOR KAMIKAZE MODE 

I IF NOT IN KAMIKAZE MODE RETURN 

BCC LI 75 

RTS PC 
L17S: I i i I i I 

nOV ♦-1. NOSCOPE 
(SETUP PATTERN NUMBER FOR TYPEOUT £ DISPLAY 
(SETUP PARITY ACTION 

(MAP FIRST SO THAT THE BLOCK MOVE WORKS 

nOV R3.-(SP) 



MOV (SP)».R3 
(OP CODE OF INSTRUCTION "MOV R2.-(PC)- 
jOP CODE OF COMPLEMENT OF INSTRUCTION "JMP (RO)' 
(USED FOR 1/2 BANK LOOP 



(ENTER TEST MODE 

(GO TO SYSTEM TEST MODE 



4«; 



MOV 
MOV 
SOB 



R0,(R3)* 
R1.-(R4) 
R2.4I 



000005 004064 



040676 



5(; 



CMP ♦5.PR0TYP 
BNE SI 

(MOVE LAST PART OF TEST TO FASTCITY 
BMOV MTP032 

JSR R5. BLOCK 1 

MTP032 

.DSABL CRF 
KERNEL (ENTER KERNEL MODE 



005141 
023044 



MOV 
MOV 



♦5141, R2 
♦lOI.RO 



(OP CODE OF INSTRUCTION "COM 
(ADDRESS TO RETURN TO IN RO 



(Rl)' 



cvnjASO nsvii-j renew y oiag. hacro yos.oz 

nT0032 SETUP yRZTE RECOVERY TEST 
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7S30 
7S&1 
7632 
7SSS 
7834 
7835 

7e3« 

7837 
7938 
7839 
7840 
7841 
7842 
7843 
7844 
7845 
784« 
7847 



022750 
022754 
022762 
022766 
022770 
022774 
023000 
023004 
023010 
023014 
023020 
023022 
023026 
023034 
023040 
023044 



012701 
012737 
005737 
001402 
012701 
004737 
012703 
012705 
012704 
005737 
001402 
012703 
012737 
004737 
005037 
000207 



160000 






nov 


•LAST*2.R1 


060000 


002262 




flOV 


#r IRST . SUPDOADD 


002524 






TST 


LINK2 








BEQ 


61 


140000 






MOV 


•140000. Rl 


024350 




61 : 


CALL 


SUPD04 


020000 






MOV 


#SIZE/2.R3 


OOOllO 






nov 




060000 






MOV 


•FIRST. R4 


002524 






TST 


LINK2 








BEQ 


7» 


014000 






MOV 


•14000, R3 


027442 


002262 


It: 


MOV 


•nTP032.SUP00A0D 


024350 






CALL 


SUP004 


002440 




9$: 


CLR 


NOSCOP' 






101: 


RETURN 





iTOP OF BANK 



SEQ 0193 



;THIS RETURN ACTS AS A NORMAL RETURN FROM MT0052 
sALSO A RETURN FROM THE "CALL SUP004'' ABOVE 
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SEQ 





023046 






7851 

' w w & 


023046 


004737 


024122 




023052 








023052 


103001 






02S0S4 


000207 






023056 






7855 


023056 








023056 


012737 


177777 


78S4 


023064 


012737 


000033 


7855 


023072 


005037 


002076 


7856 


023076 








023076 


010346 






023100 


013703 


002102 




023104 


004737 


035604 




023110 


012603 




7857 








7858 


023112 








023112 


053737 


002552 


7859 


023120 








023120 


004537 


040732 




023124 


000037 






023126 


060000 






023130 


027474 




7860 


023132 


104417 




7861 








7662 


023134 


012705 


060076 


7663 


023140 


012737 


060004 


7864 


023146 


012701 


060002 


7665 


023152 


012702 


060003 


7866 


023156 


012737 


160000 


7867 


023164 


005737 


002456 


7868 


023170 


001005 




7869 


023172 


023737 


172252 


7870 


023200 


001405 




7871 


023202 


000407 




7872 


023204 


023737 


177652 


7873 


023212 


001003 




7874 


023214 


012737 


140000 


7875 








7876 


023222 


004737 


024350 


7877 


02S226 


0050S7 


002440 


7876 


02S2S2 


000207 




7879 








7660 


023234 







7881 023234 

7882 023242 

7883 023246 

7884 023252 



012737 
012700 
012701 
013702 



MT0033 
i *SUBTEST 



SUBTST <<f1T0033 SETUP BRANCH GOBBLE TEST>> 

nT0033 SETUP BRANCH GOBBLE TEST 



002440 
002300 



177776 



002262 

002522 

172254 

1.7654 
002522 



II 
2> 
SI 



CALL KAMITEST 

ON. ERROR THEN IRETURN 



SET 

nov 

CLR 
MAP 



NOSCOPE 

♦33.REALPAT 

NOPAR 

BANK 



MOV BANK.R3 
CALL MAPPER 
.OSABL CRF 



(CHECK FOR KAMIKAZE MODE 

I IF NOT IN KAMIKAZE MODE RETURN 

BCC L176 

RTS PC 
L176: 1 1 1 1 1 1 

MOV #-1. NOSCOPE 
; SETUP PATTERN NUMBER FOR TYPEOUT £ DISPLAY 
I SETUP PARITY ACTION 
:MAP FIRST SO THAT BLOCK MOVE UOMKS 

Mnv R3.-(SP) 



MOV (SP)*.R3 



: ENTER TEST MODE 



TESTAREA 

BIS TESTMOOE.PSU 
.OSABL CRF 
BMOV MTP033. FIRST, GBLENGTH/2 

JSR R5.BL0CK3 

G8LENGTH/2 

FIRST 

MTP033 

.OSABL CRF 
KERNEL I ENTER KERNEL MODE 

MOV «FIRST»G8LENGTH.R5 

MOV «FIRST»4.SUPD0AD0 

MOV #FIRST»2.Rl 

MOV #FIRST»3.R2 

MOV «LAST*2,LINK1 

TST NOSUPER 

BNE II 

CMP SIPAR5.SIPAR6 

BEQ 21 

BR 31 

CMP UIPAR5.UIPAR6 

BNE 31 

MOV n40000.LINKl 

CALL SUP004 
CLR NOSCOPE 
RETURN 



iGO TO SYSTEM TEST MODE 



MT00S4: SUBTST <<MT00S4 



SOFT ERROR - BACKGROUND PATTERN TEST>> 



j*SUBTEST 



MT00S4 SOFT ERROR - BACKGROUND PATTERN TEST 



000034 
060000 
040000 
002620 



002300 



MOV 
MOV 
MOV 
MOV 



#34.REALPAT 
«FIRST,RO 
#SIZE.R1 
S0FTPAT.R2 
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SEQ 0195 



7eas 



7M7 
7Mt 



7M9 
7890 
7891 
7892 



789S 
7094 
7«95 
7S9« 
7897 

7S9e 
7899 

7900 



025256 
025260 
025264 
023266 
025266 
029274 

025276 
025504 
025510 
025510 
025512 

025512 
025320 
025324 
023332 
023332 
023332 

023334 



7901 
79C» 
790& 
7904 
7905 
7906 
7907 
7908 
7909 
7910 
7911 
7912 
7913 
/914 
7915 



7916 
7917 
7916 
7919 



023354 
025342 
023346 
>233S2 
0235S4 
025360 
025362 
025566 
025374 
025576 
023400 
023404 
023410 
023416 
023422 
023422 
023426 
023430 
025452 
025452 
025454 
025440 
025444 



010105 
015705 
010004 

052765 
001406 

012757 
004757 

000410 



012757 
004757 
0S276S 



000207 



012737 
015705 
016301 
000301 
042701 
006301 
010157 
023737 
001001 
000207 
012702 
004757 
012737 
004737 

005737 
001401 

000207 

005102 
004757 
004757 
000207 



002104 
020000 



027600 
024554 



027572 
024354 
020000 



000055 
002104 
002664 

177760 

0021S2 
0021S2 



0S2S24 
052516 
027616 
024334 

002346 



052516 
0245S0 



002666 
002262 



002262 
002666 



nOV R1.R5 

nOV BANKIN0EX.R5 

nOV R0.R4 

IF «eZT15 SET. IN C0NFIG*2(R5> 



i BACKGROUND PATTERN IS VALID 
NOV «t1TP054 *6 . SUPOOAOO 
CALL SUPD05 
ELSE 



BIT «eiT15.C0NFIG*2(RS) 
BEQ L177 



I READ IT 



i BACKGROUND PATTERN HAS BEEN INVALIDATED 
NOV •HTP054 . SUPOOADD 
CALL SUP003 

BIS «eiT15,C0NFIG*2(R5) iVALIOATE IT 

END i OF IF «BIT15 



BR L200 
L177: 1 1 1 1 1 1 



RETURN 

NT0055: SUBTST <<NT0055 



L200: 1 1 1 1 1 1 
SETUP WORST CASE NOISE PARITY TEST» 



iaSUBTEST 



002300 



002532 



002262 



HT0055 SETUP WORST CASE NOISE PARITY TEST 

I SET UP TEST NUMBER FOR DISPLAY 



It: 



•35.REALPAT 
BANKINDEX.R5 
C0NFI6(R3).R1 
Rl 

♦tC17.Rl 
Rl 

Rl.CSRNO 

CSRNO.PGHCSR 

1« 

•52524. R2 
BACKGND 

•mPOSS.SUPDOAOO 
SUP003 



NOV 
NOV 
NOV 
SWAB 
BIC 
ASL 
NOV 
CMP 
BNE 

RETURN 
MOV 
CALL 
NOV 
CALL 

IF QVFLAG IS TROE ^HEN (RETURN 



COM 
CALL 
CALL 
RETURN 



R2 

BACKGND 
SUP004 



lURITE BACKROUNO OF ALHOST ALT. I'S AND O'S 



TST aVFLAG 
BEQ L201 
RTS PC 
L201: 1 1 1 i i I 

I WRITE COm.ENENT PATTERN INTO NUT 
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SEQ 0196 



7921 023446 



7922 023446 012757 000036 

7923 023454 004737 032562 

7924 023460 005037 002264 

7925 023464 005000 

7926 023466 012701 100000 

7927 023472 004737 037646 
7926 02347f 004737 027760 

7929 023502 004737 037734 

7930 023506 000207 



MT0036: SUBTST <^MT0036 



SETUP CORPECTION CODE TEST>> 



(•SUBTEST 



002300 



MT0036 SETUP CORRECTION CODE TEST 



MGV 

CALL 

CLR 

CLR 

MOV 

CALL 

CALL 

CALL 

RETURN 



♦36.REALPAT 

GETCSR 
PASFLG 
RO 

«100000.R1 
MAPKERNAL 
MTP036 
UNMAP 



tSET 'JP TEST NUMBER FOR TYPEOUT AND DISPLAY 

tGET CSR INFO FROM CONFIG TABLE 

J CLEAR LOOP COUNTER 

I GET TEST DATA 

(GET FIRST ADDRESS IN BANK 

:MAP KIPAR5 AND 6 TO BANK 

.•EXECUTE TEST 

: REMAP KERNAL SPACE 



CVMJABO MSVll-J nCMORY DIAG. MACRO Y05.02 
riT0036 SETUP CORRECTION CODE TEST 
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SEQ 0197 



7932 023510 



7933 023510 012737 000037 002300 

7934 023516 012701 100000 

7935 023522 005000 

7936 023524 004737 037646 

7937 023530 004737 032562 
7930 023534 004737 030204 

7939 023540 004737 037734 

7940 023544 000207 



MT0037: SUBTST 
•SUBTEST 



<<MT0037 SETUP ECC DISABLE TEST>> 

MT0037 SETUP ECC DISABLE TEST 



MOV 

MOV 

CLR 

CALL 

CALL 

CALL 

CALL 

RETURN 



*37.REALPAT 
♦100000. Rl 
RO 

MAPKERNAL 

GETCSR 
MTP037 
UNMAP 



SETUP PATTERN AND NUMBER FOR TYPEOUT AND DISPLAY 

SET UP TEST ADDRESS 

CLEAR DATA TO BE WRITTEN 

MAP THIS TEST TO KERNEL SPACE 

GET CSRINFO FROM CONFIG TABLE 

CHECK ECC DISABLE 

REMAP KERNEL SPACE 



CVMJAeo MSVll-J r«MORY OIAC. 
MT0057 SETUP ECC DISABLE TEST 



7942 


023546 






7943 


023546 


012737 


000041 


7944 


023354 


004737 


032562 


7945 


023560 








023560 


012737 


030256 


79' 


023566 








?3566 


012701 


060000 


7947 


V23572 








023572 


023727 


002102 




023600 


001004 




7948 


023602 








023602 


012737 


000014 


7949 


023610 








023610 


000403 






023612 






7950 


023612 








023612 


C12737 


000020 


7951 


023620 








023620 






7952 


023620 


004737 


024354 


7953 


023624 


000207 
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MT0041: SUBTST <<nT0041 SETUP ADDRESS lO CSR ON DOUBLE BIT ERROR TEST>> 



002300 
002262 

000177 
002570 

002570 



SEQ 0198 



i*SUBTEST 



nT0041 SETUP ADDRESS TO CSR ON DOUBLE BIT ERROR TEST 



MOV «41.REALPAT 

CALL GETCSR 

LET SUPDOADD :- ««TP041 

LET Rl :■ •FIRST 

IF BANK EQ «177 



LET PASCNT 
ELSE 



«12. 



LET PASCNT :- •16. 

END 

CALL SUPD03 
RETURN 



: SETUP PATTERN AND NUMBER FOR TYPCOUT AND DISPLAY 
iGET CSR NUMBER AND ADDRESS FROM CONMGURATION TABLE 
J SET UP TEST ADDRESS 

nOV •MTP041. SUPDOADD 



;SET UP FIRST ADDRESS 
:ARE UE AT BANK 1777 



nOV Of^rtST.Rl 

CMP BANK.«177 

BNE L202 

nOV •12.. PASCNT 

BR L20S 
L202: t i s : : ; 

MOV •16.. PASCNT 
{EXECUTE ADDDRESS^TO' CSR 'test IN SUPVISIOR MODE 
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7955 023626 



7956 023626 

7957 023634 

7958 023640 

7959 023644 

7960 023650 

7961 023654 

7962 023660 



012737 
012701 
004737 
004737 
004737 
004737 
000207 



000042 
100000 
037646 
032562 
030430 
037734 



MT0042: SIBTST «MT0042 



p«a* 217 



SETUP EXTE(4DED Q-BUS ADDRESS TO CSR TEST>> 



SEQ 0199 



002300 



!*SUBTEST 

* MOV 
MOV 
CALL 
CALL 
CALL 
CALL 
RETURN 



MT0042 SETUP EXTENDED Q-BUS ADDRESS TO CSR TEST 



«42.REALPAT 

«100000.R1 

MAPKERNAL 

GETCSR 

MTP042 

UNMAP 



I SETUP PATTERN AND NUMBER FOR TYPEOUT AND DISPLAY 
iSET UP TEST ADDRESS 
I MAP TO KERNEL SPACE 

I SET UP CSRINFO FROM CONFIGURATION TABLE 
I CHECK EXTENDED Q-BUS ADDRESS TO CSR 
I REMAP KERNEL SPACE 



CVMJA80 nSVll-J MEMORY 
MT0042 SETUP EXTENDED 

7964 023662 



01 AG. MACRO Y0S.02 MoAtey 07 Oct 85 16:57 
Q-BUS ADDRESS TO CSR TEST 



P«0« 2ia 



SEQ 0200 



7965 
7966 
7967 

7960 
7969 
7970 
7971 



023662 
023670 
023674 
023674 
023700 
023704 
023710 
023712 



012737 
004737 

012701 
004737 
004737 
000207 



000043 
037646 

100000 
030716 
037734 



7984 
7985 
7986 

7987 
7988 
7989 
7990 



023772 
024000 
024004 
024004 
024010 
024014 
024020 
024022 



7991 024022 

7992 024030 

7993 024034 
024034 

7994 024040 

7995 024044 

7996 024050 



012737 
004737 

012701 
004737 
004737 
000207 



012737 
004737 

012701 
004737 
00*737 
000207 



000045 
037646 

100000 
031434 
037734 



000046 
037646 

100000 
031622 
037734 



002300 



7972 


023712 


012737 


000044 


002300 


7973 


023720 


004737 


032562 




7974 


023724 










023724 


012737 


031112 


0022C2 


7975 


023732 










023732 


012701 


060000 




7976 


023736 










023736 


023727 


002102 


000177 




023744 


001004 






7977 


023746 










023746 


012737 


120000 


002562 


7978 


023754 










023754 


000403 








023756 








7979 


023756 










023756 


012737 


160000 


002562 


7980 


023764 










023764 








7981 


023764 


004737 


024334 




7982 


023770 


000207 






7983 


023772 









002300 



002300 



MT0043: SUBTST <<HT0043 SETUP URITE BYTE CLEARS SBE TEST>> 

nT0043 SETUP URITE BYTE CLEARS SBE TEST 



i*SUBTEST 



MOV 
CALL 
LET Rl 



♦43.REALPAT 

MAPKERNAL 
:- «100000 



MT0044: 



CALL MTP043 
CALL UNMAP 
RETURN 

SUBTST <<MT0044 



I SET UP TEST NUMBER FOR TYPEOUT AND DISPLAY 
J HAP TO KERNEL SPACE 
J SET UP TEST ADDRESS 

MOV •100000. Rl 

iPERt^ORM URITE BYTE TEST 
(REMAP KERNEL SPACE 



t' 



i*SUBTEST 



MT0044 



SETUP SHIFTINC 1/0' S THROUGH THE CHECK BITS TEST>> 
SETUP SHIFTING 1/0' S THROUGH THE CHECK BITS TEST 



MOV «44.REALPAT 

CALL GETCSR 

LET SUPOOADD •MTP044 

LET Rl ♦FIRST 

IF BANK EQ «177 



sSET UP TEST NUMBER FOR TYPEOUT AND DISPLAY 
sGET CSR NUMBER AND ADDRESS FROM CONFIGURATION TABLE 

JiIL 

MOV •MTPO44.SUPD0ADD 



:SET UP TEST ADDRESS 
;SET UP FIRST ADDRESS 
:ARE UE AT BANK 177? 



LET ENDADD 
ELSE 

LET ENDADD 

END 

CALL SUPD03 



«120000 



♦160000 



L204: 



L205: 



MOV 4FIRST.R1 

CMP BANK.«177 
BNE L204 

MOV «120000. ENDADD 
BR L20S 



itIL 



• ff i • • I 



MOV ♦160000. END ADD 



: : : i I 



iEXECUTE ADODRESS TO CSR TEST IN SUPVISIOR MODE 



MT004S: 



RETIMN 
SUBTST 



i*SUBTEST 



^<MT004b SETUP SYNDF<OMES TO CSR ON DOUBLE BIT ERROR>> 

MT0045 SET«^ SYNDROMES TO CSR ON DOUBLE BIT ERROR 



MOV 
CALL 
LET Rl 



♦45.REALPAT 
MAPKERNAL 
:- ♦lOOOOO 



CALL MTP045 
CALL UNMAP 
RETURN 

MT0046: SUBTST <<MT0046 



J SET UP TEST NUMBER FOR TYPEOUT AND DISPLAY 
J MAP TO KERNEL SPAC? 
;SET UP TEST ADDRESS 

MOV ♦100000, Rl 

:PERf0RM SYNDROMES TO CSR ON DOUBLE BIT ERROR 
: REMAP KERNEL SPACE 



:*SUBTEST 



MT0046 



SETUP CHECK SINGLE BIT ERRORS UITH ECC DISABLED TET>> 
SETUP CHECK SINGLE BIT ERRORS UITH ECC DISABLED TET 



MOV 
CALL 
LET Rl 



♦46.REALPAT 
MAPKERNAL 
:- ♦lOOOOO 



CALL MTP046 
CALL UNMAP 
RETURN 



sSET UP TEST NUMBER FOR TYPEOUT AND DISPLAY 
sMAP TO KERNEL SPACE 
tSET UP TEST ADDRESS 

MOV ♦100000. Rl 
s PERFORM TRAPS DECTECTED ON SBE UITH ECC DISABLED TE 
: REMAP KERNEL SPACE 



CvnjABO HSVll-J MEnORY OIAG. MACRO Y0S.02 nonoay 
nT0046 SETUP CHECK SINGLE BIT ERRORS WITH ECC OISASLED TET 



P*0« 218-1 



7997 024052 



799e 024052 
7999 024060 
SOOO 024064 
024064 

8001 024070 
024070 

8002 024074 

8003 024100 

8004 024104 



012737 
004737 



012702 
004737 
004737 
000207 



000047 
037646 



012701 100000 



120000 
032162 
037734 



MT0047: SUBTST 



5 •SUBTEST 



SEQ 0201 

<<MT0047 SETUP NO GSR UPDATE ON SBE WITH EXSISTING 06E TFST>> 

riT0047 SETUP NO GSR UPDATE ON SBE UITH EXSISTING OBE TEST 



002300 



MOV 
GALL 
LET Rl 



♦47.REALPAT 
MAPKERNAL 
«100000 



LET R2 :- «120000 

CALL MTP047 
CALL UNMAP 
RETURN 



iSET UP TEST NUMBER FOR TYPEOUT AND DISPLAY 
,MAP TO KERHEL SPACE 
iSET UP TEST ADDRESS 

MOV *100000.R1 

I " " SECOND TEST ADDRESS 

MOV #120000, R2 
i PERFORM NO UPDATE TO GSR ON SBE UITH DBF 
: REMAP KERNEL SPACE 



cvtijAao 

HT0047 
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SETUP NO CSR UPDATE ON SBE UITH EXSISTING 06e TEST 



8007 024106 



8008 
8009 

8010 
8011 
8012 



8013 



8014 
8015 
8016 
8017 



024106 
024112 
024112 
024120 

024122 



024122 
024122 
024126 
024 ISO 
024 1S4 
024 136 
024142 
024144 
024144 
024144 
024146 
024150 
024150 
024152 
024152 
024152 
024154 
024156 
024156 



005037 

012737 
000207 



005737 
001006 
005737 
001003 
005737 
C01403 



000241 
000207 

000402 



000261 
000207 



002300 
177777 



002344 



002006 
OOtfSSO 
002352 



MT0999: SUBTST <<MT0999 



Pae* 220 



SETUP NULL TEST>> 



SEQ 0202 



t*SUBTEST 



MT0999 SETUP NULL TEST 



CLR 
SET 

RETURN 



REALPAT 
NULLFLAG 



nOV «-l. NULLFLAG 



KAniTEST: SUBTST <<CHECK FOR KAMIKAZE ri00E>> 



s*SUBTEST 



CHECK FOR KAMIKAZE MODE 



IF KAMIKAZE IS TRUE OR ACTFLAG IS TRUE OR APTFLAG IS TRUE 

TST KAMIKAZE 
BNE L206 
TST ACTFLAG 
BNE L206 
TST APTFLAG 
BEQ L207 
L206: 1 1 1 1 1 i 

sRUN THE TEST 

CLC 

RTS PC 



IRETURN NOERROR 
ELSE 

IRETURN ERROR 
END ;0F IF KAMIKAZE 



BR L210 

L207 : s > i s s I 
: DON'T RUN THE TEST 

SEC 

RTS PC 



L210: 



CVMJA80 MSVll-J MEMORY OIAG. 
CHECK FOR KAMIKAZE MODE 

6020 024156 
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SUPOOl: SUBTST <<SUBR EXECUTE PATTERN IN i>u»'£RV73uK>> 



SEQ 0203 



{•SUBTEST 



SUBR 



EXECUTE PATTERN IN SUPERVISOR 



S021 


024156 








MAP 


BANK 


024156 


010346 












024160 


013703 


002102 




MOV 


BANK,R3 




024164 


004737 


035604 




CALL 


MAPPER 












.DSABL 


CRF 




024170 


012603 










6022 


024172 


004737 


051336 




SUPD02: CALL 


GETOIS 


6023 


024176 








PUSH 


tLPERR . ILPADR 


024176 


013746 


002624 










024202 


013746 


002622 








6024 


024206 


010037 


002160 




MOV 


RO.SUPDRO 


8025 


024212 


012700 


002162 




MOV 


♦SUPDRl.RO 


6026 


024216 


010120 






MOV 


Rl.CRO)* 


6027 


024220 


010220 






MOV 


R2.(R0)» 


6026 


024222 


010320 






MOV 


R3,(R0)» 


6029 


024224 


C10420 






MOV 


R4,(R0)» 


6030 


024226 


010520 






MOV 


R5,(R0)» 


6031 


024230 


010620 






MOV 


SP,(RO)» 


6032 


024232 


013700 


002160 




MOV 


SUPDRO.RO 


6033 


024236 


012737 


024252 


002622 


MOV 


«TAG4I. ILPADR 


6034 


024244 


013737 


002622 


002624 


MOV 


ILPADR. ILPERR 


6035 


024252 


012700 


002176 




TAG4I : MOV 


«SUPDR6*2.R0 


6036 


0242S6 


014006 






MOV 


-CRO).SP 


6037 


024260 


014005 






MOV 


-(R0).R5 


6036 


024262 


014004 






hOV 


-(R0).R4 


6039 


024264 


014003 






MOV 


-(R0).R5 


6040 


024266 


014002 






MOV 


-CR0).R2 


6041 


024270 


014001 






MOV 


-C.90).R1 


6042 


024272 


014000 






MOV 


-(RO).RO 


804j 


024274 








SUPERVISOR 




024274 




AAA AAA 


XIII lo 


BIS 


«BIT14.PSU 










.DSABL 


CRF 


6044 


024302 


012706 


000740 




MOV 


•SUPSTK.SSP 


6045 


024306 


104424 






CACHOFF 




6046 


024310 


004737 


177640 




CALL 


FASTCITY 


6047 


024314 


104423 






CACHON 




6046 


024316 


104417 






KERNEL 




6049 


024320 


000004 






SCOPE 




6050 


024322 








POP 


ILPADR, ILPERR 




024322 


012637 


002622 










024326 


012637 


002624 








8051 


024332 


000207 






RETURN 





(MAP SUPERVISOR SPACE (TEST AREA) TO BANK 

MOV R3.-(SP) 



MOV (SP)*,R3 



MOV ILPERR.-(SP) 
MOV ILPAOR. (SP) 



: ENTER SUPERVISOR MODE 

:G0 TO SUPERVISOR MODE 



sTURN CACHE OFF 

5 CALL TO THE USER INSTRUCTION PAR'S 
;TURN CACHE ON 
t ENTER KERfJEL MODE 



MOV (SP>*. ILPAOR 
MOV (SP)*.ILPERR 



CVnjASO nSVll-J rcnCWY OIAG. macro Y05.02 
SUeR EXECUTE PATTERN IN SUPERVISOR 



Monday 07 -Oct -85 16:57 P««« 224 



SEQ 0204 



OU J* 




































012603 
























013746 








013746 


002622 


SOS 7 


024S64 


010037 


002160 




024370 


012700 


002162 


0059 


024374 


010120 




8060 


024376 


010220 




8061 


024400 


010320 




8062 


024402 


010420 




8063 


024404 


010520 




8064 


024406 


010620 




8065 


024410 


013700 


002160 


8066 


024414 


012737 


024430 


8067 


024422 


013737 


002622 


8068 


024430 


012700 


002176 


8069 


024434 


014006 




8070 


024436 


014005 




8071 


024440 


014004 




8072 


024442 


014003 




8073 


024444 


014002 




8074 


024446 


014001 




8075 


024450 


014000 




8076 


024452 








024452 


053737 


002552 


8077 


024460 


005737 


002456 


8076 


024464 


001403 




8079 


024466 


012706 


000700 


8080 


024472 


000402 




8081 


024474 


012706 


000740 


8082 


024500 


104424 




8083 


024502 


004777 


155554 


8084 


024506 


104423 




8085 


024510 


104417 




8086 


024512 


000004 




8087 


024514 








024514 


012637 


002622 




024520 


012637 


002624 


8088 


024524 


000207 





SUP003: HAP 

MOV 
CALL 



BANK 

BANK.R3 
MAPPER 



.OSABL CRF 



SUP004: CALL 
PUSH 



GETOIS 

ILPERR.tLPAOR 



TBG4ti 



1«: 
2t. 



MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 

TESTAREA 
BIS 
.OSABL 
TST 
BEQ 
MOV 
BR 
MOV 

CACHOFF 
CALL 
CACHON 
KERr^L 
SCOPE 
POP 



RO.SUPORO 
«SUP0R1.R0 
Rl.CRO)* 
R2.(R0)* 
R3.(R0)* 
R4.(R0)* 
R5.(R0)» 
SP.CRO)* 
SUPORO.RO 
*TBG4« . « LP ADR 
tLPADR.tLPERR 
*SUP0R6*2.R0 
-(RO).SP 
-(R0).R5 
-(R0).R4 
-CR0).R3 
-(R0).R2 
-(RO).Rl 
-(RO).RO 

TESTMOOE.PSU 
CRF 

NOSUPER 
1) 

•USESTK.USP 
2* 

#SUPSTK,SSP 
aSUPOOAOD 



«LPAOR,«LPERR 



iMAP SUPERVISOR SPACE (TEST AREA) TO BANK 

MOV R3.-(SP) 



MOV (SP)*.R3 



MOV »LPERR.-(SP) 
MOV »LPAPR.-(SP) 



: ENTER SUPERVISOR MODE 

iGO TO SYSTEM TEST MODE 



:TURN CACHE OFF 



:TURN CACHE ON 

s ENTER KERNEL MODE 



RETURN 



MOV (SP)*.)LPADR 
MOV (SP)*.»LPERR 



CvnjAeO HSVll-J nerioRY OI*C. 
rCnORY TEST PATTERN ROUTINES 

8091 
8092 
8093 
8094 
8095 
8096 
8097 
8098 
8099 
8100 

8101 024526 



8102 024526 010220 

8103 024530 077102 

8104 024532 000240 

8105 024534 012401 

8106 0245S6 020102 

8107 024540 (.01402 
8106 024S42 104430 

8109 024544 000240 

8110 024546 077306 

8111 024550 000207 

8112 024552 



8113 024552 010220 

8114 024554 062702 000002 

8115 024560 077104 

8116 024562 000240 

8117 024564 012400 
8116 024566 020005 

8119 024570 001401 

8120 024572 104427 

8121 024574 062705 000002 

8122 024600 077307 

8123 024602 000207 
6124 024604 



8125 024604 010540 

6126 024606 062705 000002 

6127 024612 077104 

8126 024614 000240 

8129 024616 162702 000002 

8130 024622 012401 

8131 024624 020102 

8132 024626 001401 
6133 024630 104430 

8134 024632 077307 

8135 024634 000207 
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.S8TTL MEMORY TEST PATTERN ROUTINES 



SEQ 0205 



PATTERN REGISTER CONVENTIONS 

RO FIRST ADDRESS OF PATTERN (FIRST .LAST«2. ETC) 

Rl NUMBER OF ADDRESSES IN PATTERN (SIZE) 

R2 DATA FOR PATTERN (ONES. 52525. ETC) 

R3 COPY OF Ri (IF NECESSARY) 

R4 COPY OF RO (IF NECESSARY) 

R5 COPY OF R2 (IF NECESSARY) 



MTPOOO: SUBTST <<MTPOOO 



BASIC DATA TEST>> 



•SUBTEST 



MTPOOO BASIC DATA TEST 



i>: MOV 
SOB 
NOP 

2>: MOV 
CMP 
BEQ 
PERR02 
NOP 

3>: SOB 

RETURN 
MTPOOl: SUBTST 



R2.(R0)* 
Rl. MTPOOO 

(R4)*,R1 

R1,R2 

3> 



R3.2> 
<<MTP001 



IV177640 
iV177642 
iV177644 
iV177646 
;V 177650 
JV177652 
JV177654 
I VI 77656 
iV177660 
iV177662 
ADDRESS TEST>> 



j*SUBTEST 



MTPOOl ADDRESS TEST 



3>: 


MOV 


R2.(R0)* 


iV177640 




ADO 


•2.R2 


IV177642 




SOB 


R1.3> 


iV177646 




NOP 


tV1776S0 


11: 


MOV 


(R4)*.R0 


iV1776S2 




CMP 


RO.RS 


IV177654 




BEQ 


21 


iV1776S6 




PERROl 




iV177660 


21: 


ADO 


«2.RS 


IV177662 




SOB 


R3.1> 


IV177666 






,V177672 


MTP002: 


SUBTST 


<<MTP002 


COMPLEMENT ADDRESS TEST (URITE DOWN. READ UP)>> 



i*SUBTEST 



MTP002 COMPLEMENT ADDRESS TEST (URITE DOUN. READ UP) 



3ti 



II: 



2ti 



MOV 

ADO 

SOB 

NOP 

SUB 

MOV 

CMP 

BEQ 

PERR02 

SOB 

RETURN 



R5.-(R0) 

•2.RS 

R1.3$ 

«2.R2 
(R4)».R1 
R1.R2 
2> 

R3.1> 



;V177640 
;V177642 
JV177646 
:V177650 
;V177652 
:V177656 
JV177660 
:V177662 
tV177664 
SV177666 
8V177670 



CVnjABO nSVll-J nenORY OIAG. macro YOS.OZ nonoav 
nTP002 COMPLEnENT ADDRESS TEST (URITE DOHN. READ U^) 



8158 


024636 






6139 








8140 








8141 








8142 








8143 








8144 








8145 


024636 


010421 




8146 


024640 


010421 




8147 


024642 


077203 




6146 


024644 


005104 




8149 


024646 


052704 




81S0 


024650 


000401 




81S1 


024652 


012702 


000004 


8152 


024656 


077511 




8153 


024660 


005104 




8154 


024662 


C52704 




8155 


024664 


000401 




8156 


024666 


012705 


000100 


8157 


024672 


077317 




6156 


024674 


000207 




8159 








8160 








8161 


024676 







nTPA03: SUBTST <<nTPA03 



Pag* 228 



3 XOR 9 WORST CASE NOISE TEST (URITE )>> 



SEQ 0206 



i*SUBTEST 



nTPA03 3 XOR 9 WORST CASE NOISE TEST (URITE) 



iR3 
sR4 
:R5 
. ENABL 
1»: MOV 
MOV 

soe 
con 

BIS 

WARN2: 401 
MOV 

soe 

COM 
BIS 

UARN3: 401 
MOV 
SOB 

RETURN 
.OSABL 

MTPBOS: SUBTST 



tRl - ADDRESS 
iR2 - SMALL LOOP CONSTANT 

MUM OF ADO TO TEST (LARGE LOOP) 
GOOD DATA 

MEDIUM LOOP CONSTANT 



1 CO 

LSB 




R4.(R1)* 


iV177640 


R4.(R1)* 


IV177642 


R2.1* 


IV177644 


R4 


SV177646 


(PC)».R4 


;V177650 


sV 177652 


44. R2 


:V177654 


RS.l* 


>V 177660 


R4 


:V177662 


CPC)».R4 


iV177664 


tV177666 


464.. R5 


tV177670 


RS.lt 


; VI 77674 


;V177676 


LSB 




<<MTPB03 


3 XOR 9 



{•SUBTEST 



MTPBOS 3 XOR 9 WORST CASE NOISE TEST (READ) 



8162 








8163 


024676 


000137 


024736 


8164 


024702 


077203 




8165 


024704 


0051')4 




8166 


024706 


052704 




8167 


024710 


000- 01 




8168 


024712 


0127 )2 


000004 


8169 


024716 


077511 




8170 


024720 


005104 




8171 


024722 


052704 




8172 


024724 


000401 




8173 


024726 


012705 


000100 


8174 


024732 


0773? 7 




8175 


024734 


00020; 




8176 









II: 



.ENABL 


LSB 




JMP 


8#MTPC03 


SV177640 


SOB 


R2.1* 


J VI 77644 


COM 


R4 


IV177646 


BIS 


(PC)».R4 


IV177650 


401 




SV177652 


MOV 


•4.R2 


;V177654 


SOB 


R5.1* 


; VI 77660 


COM 


R4 


tV177662 


BIS 


(PC)».R4 


iV177664 


401 




tV177666 


MOV 


464..RS 


JV177670 


SOB 


R3.1I 


;V177674 


RETURN 


tV177676 


.DSABL 


LSB 





GO TO V172360 



CvnjA80 nsvii-j rcnoRY oiag. riACRO Y05.02 
nTPBOS 3 XOR 9 UOAST CASE NOISE TEST (READ) 



noTMtoy 07-0ct-S5 16:57 Pag* 230 



SEQ 0207 



8179 024 7S6 



8150 
8181 
8182 
8183 
8184 
818S 
8186 
8187 



8188 
8189 
8190 
8191 
8192 
8193 
8194 



024736 
024 740 
024742 
024744 
024746 
0247S0 

0247S4 



024754 
024756 
024760 
024762 
024764 
024766 
024770 



020421 
001401 
104431 
005141 
005111 

000137 024754 



020421 
001401 
104431 
005127 
COOOOO 
001363 

000137 024702 



HTPC03: SU8TST 



I *SUBTEST 



<<nTPC03 TEST DATA SUBPROGRAn>> 

nTPC03 TEST DATA SUBPROGMAn 



II; 



BEQ 
PERR03 

con 
con 

JMP 



R4.CR1)* 
II 

-CRD 
(Rl) 

S«nTPD03 



IV172360 
I VI 72362 
IV172364 
IV172366 
IV172370 
IV172372 



GO TO V172260 



HTPD03: SUBTST 



I' 



••SUBTEST 



<<HTP003 
HTPD03 TEST 



TEST DATA SUBSUBPROGRAn>> 



DATA SUBSUBPROGRAn 



l«i 



aip 

BEQ 
PERR03 

con 

0 

BNE 

JflP 



R4.(R1)* 
II 

CPO* 

HTPC03 
8«nTPB03*4 



tV172260 
I VI 72262 
IV172264 
SV172266 
JV172270 
iV172272 
JV172274 



60 TO V172360 
60 TO V177644 
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riTPOO? TEST DATA SUBSUBPROGRAri SEO 0208 



8197 


024774 






MTPA04 : 


SUBTST 


<<MTPA04 


ROTATING ZEROS TEST>> 










itSUeiEST 


MTPA04 ROTATING ZEROS TEST 


8190 


024774 


012705 


000010 


1»: 


MOV 


•8. .R5 


IV177640 


8199 


025000 


010504 






MOV 


R5.R4 


iV177644 


8200 


025002 


000241 






CLC 




;V177646 


8201 


025004 


000137 


025030 




JMP 


O^MTPBO* 


1 V177650 


8202 


025010 


016004 


177776 




MOV 


-2(R0),R4 


; V177654 


8203 


025014 


103402 






BCS 


2$ 


» V177660 


8204 


025016 


020204 






CMP 


R2,R4 


|V 177662 


8205 


025020 


001401 






BEQ 


3t 


J V 177664 


8206 


025022 


104432 




21: 


PERR04 




J V177o6o 


8207 


025024 


077115 




3«: 


SOB 


Rill* 


S V177o iQ 


4208 


025026 


000207 






RETURN 




J V177672 


8209 
















8210 


025030 






MTPB04: 


SUBTST 


<<MTPB04 


SUBR ROTATING BIT>> 










j*SUBTEST 


MTPB04 SUBR 


ROTATING BIT 


8211 


025030 


106110 




Ut 


ROLB 


(RO) 


SV172360 












SOB 


R5,l* 


:V172362 


8213 


025034 


106120 






ROLB 


(RO)* 


;V172364 


8214 


025036 


106110 




21: 


ROLB 


CRO) 


tV172366 


8215 


025040 


077402 






SOB 


R4.2) 


IV172370 


8216 


025042 


106120 






ROLB 


(R0)» 


IV172372 


8217 


025044 


000137 


025010 




JMP 


8«MTPA04*14 


J V 172374 


8218 
















8219 


025050 






MTPOOS: 


SUBTST 


<< MTPOOS 


ROTATION ONES TEST>> 










s*SUBTEST 


MTPOOS ROTATION ONES TEST 


8220 


025050 


012705 


000010 


1«: 


MOV 


♦8. .R5 


JV177640 


8221 


025054 


010504 






MOV 


R5,R4 


JV177644 


8222 


025056 


000261 






SEC 




IV177646 


8223 


025060 


000137 


025030 




JMP 


S«MTPB04 


IV177650 


8224 


025064 


016004 


177776 




MOV 


-2(R0).R4 


;V 177654 


8225 


025070 


103002 






BCC 


21 


:V177660 If THIS HAPPENS THE GOOD £ BAO MATCH 


8226 


025072 


020204 






CMP 


R2.R4 


:V177662 


8227 


025074 


001401 






BEQ 


3» 


JV177664 


8228 


025076 


104432 




2$: 


PERR04 




tV177666 


8229 


025100 


077115 




3»: 


SOB 


Rl.K 


JV177670 


8230 


025102 


000207 






RETURN 




SV177672 



rVMJABO MSVll-J MEMORY OIAG. 
MTP005 ROTATION ONES TEST 
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SEQ 0209 



6253 


025104 








MTP006: 


SUBTST 


<<MTP006 


INITIAL DATA TEST>> 












i*SUBTEST 


MTP006 INITIAL 


DATA TEST 


8254 














J THIS TEST CHECKS THE 01/00 LINES BY 


0255 














: SHIFTING A 1 THROUGH THE WORD. 


6256 


025104 


012757 


MA AAA 4 

000001 


002242 




MOV 


vl.OATBUF 


tSET THE FIRST TEST BIT 


6257 


025112 


005057 


002244 






CLR 


DATBUF*2 


(CLEAR 2N0 WORD 


6258 


025116 


015771 


002242 


A A A A A /N 

000000 


11 • 


MOV 


OATBUF.SCRl) 


: WRITE TEST WORD 1 


6259 


025124 


015771 


002244 


AAA A A A 

000002 




MOV 


DATBUF»2,82(R1) 


lAND TEST WORD 2 


8240 


025132 


017102 


AAAAAA 

000000 






MOV 


S(R1}.R2 




6241 


025156 


025702 


002242 






CMP 


0ATBUr.R2 


:NOU READ THEM 


6242 


025142 


001401 








BEQ 


21 


iBR IF FIRST 16 OK 


8245 


025144 


104455 








PERR07 




(ERROR TRAP 


6244 


















8245 


025146 


A4 ^ 4 /\ 

017102 


A AAA AO 

000002 




2t : 


MOV 


S2(R1).R2 




8246 


025152 


025702 


002244 






CMP 


0ATBUF*2,R2 


(NOW READ SECOND WORD 


6247 


025156 


OOMOl 








BEQ 


51 


ItA ALy 

(BR IF OK 


8246 


025160 


1044 j4 








PERRIO 




^AAAA VAAn 

(ERROR TRAP 


8249 


















8250 


025162 


005737 


002244 




5>: 


TST 


A * V A 1 A 

0ATBUF*2 


> ■ A A i ik ^ V AW AP^fti V^^V^A ^ 

(HAS LAST BIT BEEN TESTED ? 


6251 


025166 


100405 








BMI 


41 


(MINUS MEANS BIT 31 


B2o2 


025170 










OLEFT 


OATBUF 


ftiA AilV^V V^f^V AW ■ 

(NO, SHIFT TEST BIT LEFT 




4 T/V 

023X70 


#\A^ 4 

006137 


002242 






ROL 


OATBUF 






025174 


A/V£ 4 

00ol37 


002244 






ROL 


OATBUF •2 
















.OSABL 


CRF 




6233 


02^200 


000746 








BR 


4 A 

11 


(60 WRITE NEW TEST DATA 


• OKA 
















ft.lAI 1 ^ATftt^ TA f^LlT^V A A TftI AAVA AVA^AVVAfta 

(NOW GOING TO SHIFT A 0 IN DATA DIRECTION 


M ^ tt tt 
8255 


025202 


012737 


177776 


002242 


41: 


MOV 


A4 ^^^^^ AAYAl 1^ 

♦177776 , OATBUF 


At iV A A VftI AYT A 

(PUT A 0 IN BIT 0 


8256 


025210 


012737 


177777 


002244 




MOV 


♦-1. OATBUF ♦S 


AkiA m t ^ All AVL^^AA 

(AND I'S IN ALL OTHERS 


8257 


025216 


013771 


002242 


oooooo 


SI: 


MOV 


A A TBI If n 4 ^ 

OATBUF.SCRl; 


1 in T TP ▼l„lP A A Y A 

(WRITE THE DATA 


8258 


025224 


013771 


002244 


000002 




MOV 


A ik T A t *^ A A A ^ A ■ X 

OATBUF »2.S2(R1} 


(2 WORDS WORTH 


8259 


025252 


A4 ^ 4 /% 

017102 


000000 






MOV 


A^ A 4 X A A 

fiCRl),R2 




8260 


025256 


023702 


A A O O A O 

002242 






CMP 


OATBUF .R2 


& ■ Al 1 A^ A A ^ T A ^ V 1 lAA A 

(NOW READ FIRST WORD 


8261 


025242 


001401 








BEQ 




t OH Ir UK 


6262 


025244 


4 AA AW 

104433 








PERR07 






8265 


















6264 


025246 


A 4 ^ 4 A'% 

017102 


A A AAA O 

000002 




6»: 


MOV 


»2(R1).R2 




6265 


02S2S2 


023702 


002244 






CMP 


OATBUF »2.R2 


(NOW, READ SECOND WORD 


6266 02S2S6 


AA4 A A« 

001401 








BEQ 


7» 


(BR IF OK 


6267 


025260 










PERRIO 






8268 


















6269 


025262 


005737 


002244 




71: 


TST 


OATBUF .2 


(TESTED BIT 51 YET? 


8270 


025266 


lOOOOS 








BPL 


81 


(PR IF YES. WE'RE DONE 


6271 


025270 










OLEFT 


OATBUF 






025270 


006157 


002242 






ROL 


OATBUF 






025274 


006137 


002244 






ROL 


OATBUF *2 
















.OSABL 


CRF 




6272 


025500 


000746 








BR 


5* 


(KEEP GOING 


6275 


025502 


000207 






6*: 


RETURN 







CVfljABO fiSVll-J 
MTP006 INITIAL 

8276 025S04 



8277 
8278 
8279 
8280 
8281 
8282 
8283 
8284 
828S 
826« 
8267 
8288 
8289 
8290 
8291 
8292 
8293 
8294 
8295 
8296 
8297 
8298 
8299 
6300 
8301 
8302 
8303 
8304 
8305 
8306 
8307 
8308 
8309 
8310 
8311 
8312 
6313 



MEMORY OIAG. 
DATA TEST 
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SEQ 0210 



MTP007: SUBTST 



i*SUBTEST 



<<MTP007 ADDRESS BIT TEST>> 

MTP007 ADDRESS BIT TEST 



t THIS TEST CHECKS TO SEE THAT EACH ADDRESS 

: BIT IN EACH 16K JANK CAN BE ASSERTED UNIQUELY. 

; IT CHECKS FOR ADDRESS BITS THAT MAY BE STUCK 

HIGH. STUCK LOU CR STUCK TOGETHER. 





lit \QO 






fRl) RO 




025306 


105700 




TSTB 


RO 


(READ AND COMPARE FOR ZEROS 


025310 


001401 




BEQ 


1* 


iBR IF OK 


025312 


104435 




PERRll 






025314 


1051x1 


11: 


COMB 


(Rl) 


; COMPLEMENT THE BYTE 


VB 


111100 




MOVB 


CR1),R0 




025320 


105700 




TSTB 


RO 


iREAO FOR NON ZEROS 


025322 


001001 




BNE 


21 


:BR IF OK 


025324 


104436 




PERR12 






025326 


C40201 


2<: 


BIC 


R2,R1 


{MASK OFF THE ASSERTED BIT 


025330 


006302 




ASL 


R2 


s SHIFT R2 FOR NEXT BIT 


025332 


050201 




BIS 


R2.R1 


;SET THE NEU BIT INTO Rl 


025334 


011100 




MOV 


(RD.RO 




023S36 


003700 




T CT 

TST 


OA 

HO 


;KcMU Inc New AUUNc5S> 


025340 


001401 




BEQ 


31 


:READ FOR ZEROS 


025342 


104437 




PERR13 






025344 


005111 


3<: 


COM 


(Rl) 


iCOMPL THE UORD 


025346 


011100 




MOV 


CRD.RO 




025350 


005700 




TST 


RO 


sREAD IT AGAIN 


025352 


001001 




BNE 


4$ 




025354 


104440 




PERR14 






025356 


022702 100000 


4«: 


CMP 


«100000.R2 




025362 


001407 




BEQ 


5» 




025364 


022702 010000 




CMP 


«10000.R2 


: CHECK FOR MSB IN 4K BANK 


025370 


001356 




BNE 


2$ 


I NOT LAST BIT. BRANCH 


025372 


006302 




ASL 


R2 




025374 


012701 160000 




MOV 


0160000. Rl 




025400 


000752 




BR 


2t 




025402 


000207 


5$: 


RETURN 







CVMJABO MSVll-J MEMORY OIAC. 
MTP007 ADDRESS BIT TEST 

8316 C2S404 



8517 
8318 

8319 025404 010402 

8320 025406 010403 

8321 025410 062702 000004 

8322 025414 012713 177777 

8323 025420 012763 177777 

8324 025426 105013 

8325 025430 010401 

8326 025432 020201 

8327 025434 001420 

8328 025436 020301 
8S29 02S4''0 001007 
8330 025442 111100 
8331 

8332 025444 C22700 000000 

8333 025450 001401 

8334 025452 104435 
8335 

8336 025454 005201 

8337 025456 000765 

8338 025460 111100 

8339 025462 122700 177777 
6340 025466 001401 

8341 025470 104436 
6342 

6343 025472 005201 

8344 025474 000756 

8345 025476 112713 177777 

8346 025502 005203 

8347 025504 020302 

8348 025506 001347 

8349 025510 000207 
8350 
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SCO 0211 



MTPOlO: SUBTST <<MTP010 



BYTE ADDRESSING TEST>> 



» •SUBTEST 



MTPOlO BYTE ADDRESSING TEST 



000002 



II: 
2t: 



31: 
41: 

51: 
6$: 



MOV 
MOV 
ADD 
MOV 
MOV 
CLR6 
MOV 
CMP 
BEQ 
CMP 
ONE 
MOVB 
s WARNING 
CMP 
BEQ 
PERRll 

INC 
BR 
MOVB 
CMPB 
BEQ 
PERR12 

INC 
BR 
MOVB 
INC 
CMP 
BNE 
RETURN 



(TEST 3 THIS TEST CHECKS FOR PROPER 

BYTE ADDRESSING WITH ECC DISABLED 
|R4 HAS LOUEST ADDRESS 
;PUT IT IN R3 ALSO 
jPOINT R2 TO LAST BYTE .1 
: WRITE ALL ONES IN 
tTHE 4 TEST BYTES 
J CLEAR A BYTE 

» INITIALIZE Rl FOR EACH PASS 
jIF EQUAL. JUST READ LAST BYTE 
I BR IF EQUAL 

lis THIS THE BYTE OF ZEROS 
iBR IF NOT 



R4.R2 
R4.R3 
•4.R2 
* 1,CR3) 
*-1.2(R3) 
{R3) 
R4.R1 
R2.R1 
6t 

R3.R1 
41 

CRD.RO 

IF YOU OPTOMIZE 
*0.R0 
3t 



CHANGE THE PCBUMP FOR THIS 
:IT IS. COMPARE FOR ZEROS 



ERROR INCASE OF TRAPS 



Rl 
2* 

(Rl).RO 
♦-l.RO 
SI 



Rl 
21 

*-l.(R3) 
R3 

R3.R2 
II 



iNEXT BYTE 
i RETURN 

jITS NOT THE BYTE OF O'S. READ I'S 



J MOVE TO NEXT BYTE 



RESTORE I'S TO BYTE JUST 
INC TO NEXT BYTE 
WAS THAT JUST THE LAST ONE? 
;BR IF NO 



TESTED 



CVriJABO MSVll-J MEMOSY OIAG. 
MTPOlO Brie AOO«€SSING TEST 

83SS 0255X2 



8354 

8355 
8 356 
8357 
8358 
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nTP014: SUBTST <<nTP014 BASIC DOUBLE BIT ERROR TEST>> 



SEQ 0212 



|*SUBTEST 



nTP014 BASIC DOUBLE BIT ERROR TEST 



8359 


025S12 


104424 






CACHOFF 


8360 


025514 
025514 


005037 


002072 




LET PARCNT :- «0 


8361 


025520 








LET NOPAR :- «1 




025520 


012737 


000001 


002076 




8362 


025526 








LET ADDRESS :- «FIRST 




025526 


012737 


060000 


002034 




8363 


025534 


104513 






CBREG 


8364 


025536 








LET CSR #3145 




025536 


012737 


003145 


002150 




8365 


025544 


104425 






LOAOCSR 


8366 


025546 








LET GOOD :- #103145 




025546 


012737 


103145 


002044 




8367 


025554 
025554 


005011 






LET (Rl) #0 


8368 


025556 


005711 






TST CRD 


8369 


025560 








IF PARCNT NE *1 




025560 


023727 


002072 


000001 






025566 


001401 








8370 


025570 


104055 






ERROR *55 


8371 


025572 
025572 








END 


8372 


025572 


104426 






READCSR 


8373 


025574 


04273/ 


020000 


002150 


BIC «6IT13,CSR 


8374 


025602 








IF CSR NE GOOD THEM 




025602 


023737 


002150 


002044 






025610 


001407 








8575 


025612 








SET HEADER 




025612 


012737 


177777 


002612 




8576 


025620 








LET BAD : ■ CSR 




025620 


013737 


002150 


002052 




8377 


025626 


104065 






ERROR *65 


8378 


025630 
025630 








END 


8379 


025630 


104473 






ECCIINIT 


8380 


025632 


005037 


002266 




CLR PASSNO 


8381 


025636 
025636 








REPEAT 


8382 


025636 


104473 






ECCIINIT 


8383 


025640 


005237 


0U2266 




INC PASSNO 


SS84 


025644 


005037 


002072 




CLR PARCNT 


8S8S 


025650 
025650 


112711 


000377 




LET (Rl) :B- #377 


8386 


025654 


105711 






TSTB CRD 


8387 


025656 








IF PARCNT NE «1 




025656 


023727 


002072 


000001 






025664 


001411 








8588 


025666 








SET HEADER 



THIS TEST CHECKS THAT A DOUBLE ERROR UILL BE DETECTED 
A BYTE WRITE UITH A DOUBLE ERROR ON A HSVll-P 
UILL BE ABOTRED. 

tTURN OFF CACHE 
: CLEAR PARCNT 

jSET PARITY ACTION 

iSET ADDRESS FOR ERROR REPORT 



CLR PARCNT 
nOV •I. NOPAR 



nOV «FIRST, ADDRESS 
: ENABLE CHECK/SYNDROME BIT REGISTER 
iDBE CHECK BITS FOR CSR 

nOV #3145. CSR 

i WRITE OBE CHECK BITS TO CSR 
■GOOD DATA 

nOV «103 145. GOOD 
: WRITE ZEROS AND DBL ERROR CHK BITS A-0 

CLR CRD 

:READ A-0 TO GET DOUBLE BIT ERROR 
(WAS BUSPBL ASSERTED???? 

CMP PARCNT. #1 
BEQ L211 

:ERROR CALL i : MISSED EXPECTED TRAP 

s 

L211: ! i t t ] ; 

:READ CSR FOR CORRECT CHECK BITS AND DBE INDICATOR 
! CLEAR INHIBIT MODE POINTER FROM DATA IF IT EXSISTSl 
: CHECK IF DOUBLE ERROR BIT IS SET 

CMP CSR. GOOD 



iBAD DATA 



{ENABLE BUSPBL 
(CLEAR LOOP COUNTER 



L212: 



BEQ L212 
MOV «-l. HEADER 
MOV CSR. BAD 

i : i i 



B30: : i I : s i 

i ENABLE BUSPBL 
(INCREMENT LOOP COUNTER 
(CLEAR PARITY ACTION COUNTER 
(WRITE BYTE SHOULD BE ABORTED 



(READ Rl TO SEE IF IT IS STILL 
(WAS WRITE ABORTED??? 



MOVB ♦377.CRD 



CMP PARCNT. *1 
BEQ L213 
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sGOOD DATA 
iBAO DATA 





025666 


012737 


177777 


002612 






5369 


025674 
025674 


005037 


002044 




LET GOOD :- 


«0 


8590 


025700 








LET BAD :• 


*377 




025700 


012737 


000377 


002052 






6391 


025 706 


104056 






ERROR *56 




8392 


025710 
025710 








END 




8393 


025710 


005201 






INC Rl 




8394 


025712 








UNTIL PASSNO EQ 


#2 




025712 


023727 


002266 


000002 








025720 


001346 












025722 












6395 


025722 


005041 






CLR (Rl) 




8396 


025724 


104503 






CLRICSR 




6397 


025726 


005037 


002072 




CLR PARCNT 




8398 


025732 


104423 






CACHON 




8399 


025734 


000207 






RETURN 




8400 















L213: 



:AN0 REPEAT ON HIGH BYTE 



E30 

; CLEAR LUT 
i CLEAR CSR 

{CLEAR PARITY TRAP COUNTER 
:TURN ON CACHE 



SEQ 0213 



MOV «-l. HEADER 
CLR GOOD 
MOV «377.BA0 



CHP PASSNO.*^ 
BNE B30 

• i : 1 1 1 
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SEQ 0214 



0404 
8405 
6406 
8407 
6406 
6409 
6410 
6411 
6412 
6413 
6414 
6415 
6416 
6417 
6416 
6419 
6420 
6421 
6422 
6423 
8424 
6425 
6426 
8427 
6428 
6429 
8430 
8431 
8432 
8433 







mP017: 


SUBTST 


<<MTP017 


HOLDING I'S £ O'S TEST>» 






t ♦SUBTEST 


MTP017 HOLDING I'S 6 O'S TEST 








i*(l) 


THIS TEST 


CHECKS THE MEMORY FOR THE CAPABILITY 








s* 


OF HOLDING I'S AND O'S BY WRITING A BACKGROUND 








J* 


OF 000377 


AND READING IT 










MEMORY IS 


WRITTEN USING A BYTE AT A TIME 








!»(3) 


STEPS 1 6 


2 ARE REPEATED WITH A SWAPPED BACKGROUND PATTERN 








iNOTE: 


THIS TEST 


WRITES BYTES £ READS WORDS 


025736 


012701 060000 




MOV 


•FIRST. Rl 




025742 


010104 




MOV 


R1.R4 




025744 


012705 160000 




MOV 


♦LAST»2.R5 


025750 


012700 000377 




NOV 


♦377.ro 


sGET THE PATTERN INTO RO 


025754 


010003 




MOV 


R0.R3 




025756 


000303 




SUAB 


R3 




025760 


110021 


1(: 


MOVB 


RO.CRD* 


;WRITE A BYTE 


025762 


110321 




MOVB 


R3.(R1)* 


J WRITE THE MEMORY WITH THE BYTE STORED IN BAKPAT 


025764 


020105 




CMP 


R1.R5 


; COMPARE TEST LOC TO TOP ♦ 2 


02S766 


103774 




BLO 


11 


(BRANCH IF LOWER 


025770 


014102 


2» : 


MOV 


-(R1).R2 




025772 


020002 




CMP 


R0,R2 


sTEST THE MEMORY TO SEE IF IT CONTAINS 






(THE WORD STORED IN BAKPAT 


025774 


001401 




BEQ 


31 




025776 


104446 




PERR22 






026000 


020104 


3$: 


C«» 


R1.R4 


jKEEP ON TESTING THE MEMORY UNTIL 


026002 


101372 




BHI 


21 


iRl EQUALS THE LOWEST ADDRESS 


026004 


000303 




SUAB 


R3 


s CHANGE THE DATA PATTERN 


026006 


000300 




SUAB 


RO 




026010 


001763 




BEQ 


It 


:IF THE DATA PATTERN DOES N01 HAVE LOW 












s BYTE -0 THEN FALL THRU 


026012 


000207 




RETURN 







CVMJABO MSVll-J MEMORY OIAG. 
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8437 026014 



8438 
8439 
8440 
8441 
8442 
8443 
8444 
8445 



8447 
8448 
8449 
8450 
8451 

8452 
8453 

8454 

8455 

8456 

8457 
8458 

8459 

8460 
8461 
8462 

8463 
8464 

8465 
8466 
8467 
8468 
8469 

8470 
8471 



026014 
026016 
026020 
026024 
026C26 
026026 
026026 
026026 
026032 
026032 
026036 
026036 
026042 
026042 
026050 
026052 
026052 
026056 
026056 
026060 
026060 
026060 
026064 
026064 
026064 
026064 
026064 
026070 
026070 
026072 
026072 
026076 
026102 
026106 
026106 
026112 
026114 
026114 
026116 
026120 
026122 
026124 
026132 
026132 
026140 
026142 
026142 
026150 



104424 

005000 

105037 002264 
104513 



105237 

012704 

005037 

123727 
001003 

012705 

000402 



005204 

116402 

072227 
052702 

010237 
104425 

010011 
104503 
005711 
104426 
042737 

023727 
001407 



002264 
177777 
002324 
002264 

000001 



012705 177776 



005237 002324 



030164 
000005 
000004 

002150 



177757 
002150 
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MTP020: SUBTST <<MTP020 SYNDROMES TO CSR ON SINGLE BIT ERROR TEST>> 



SEQ 0215 



j*SUBTEST 



MTP020 SYNDROMES TO CSR ON SINGLE BIT ERROR TEST 



; THIS TEST CHECKS TO SEE IF THE SINGLE BIT ERRORS CAUSE THE SBE 

> BIT IN THE CSR TO BE SET AND CORRECT SYNDROME BITS ARE GENERATED FOR 

t ALL 16 DATA BITS. 



000001 



002150 
000020 



CACHCFF 
CLR RO 
CLRB PASFLG 
CBREG 
REPEAT 

LET PASFLG :B- PASFLG * «1 
LET R4 ♦-I 
LET BITNO :- «0 
IFB PASFLG EQ «1 

LET R5 :- #1 
ELSE 

LET R5 :- ♦177776 

END 

REPEAT 

INC BITNO 

LET R4 :- R4 * «1 

LET R2 :B- PTABLE(R4) 

ASH •5.R2 
BIS «6IT2.R2 
LET CSR R2 



LOADCSR 
LET (Rl) 



RO 



CLRICSR 
TST (Rl) 
READCSR 
BIC •tC20.CSR 
IF CSR NE «20 



012737 000020 002044 



LET GOOD 
LET BAD : 



> «20 

CSR 



J TURN OFF CACHE 
} CLEAR DATA 
CLEAR PASFLG 

ENABLE CHECK/SYNDROME BIT REGISTER 

B31: 1 i 1 1 i i 
INCREMENT LOOP COUNTER 

INCB PASFLG 
INDEX TO SINGLE BIT ERROR TABLE 

MOV •-1.R4 
(CLEAR INNER LOOP COUNTER 

CLR BITNO 

; SELECT DATA TO BE CORRECTED BY PASSNO 

CMPB PASFLG. #1 
BNE L215 

:DATA-0]BIT TO BE CORRECTED IS A ONE 

MOV n.RS 

BR L216 
L215:!;!;;s 
jDATA-177776;BIT TO BE CORRECTED IS A ZERO 

MOV #177776. R5 



L216: 



...... 



B32: : : t s i i 
(INCREMENT BIT POINTER 
(POINT TO NEXT SET OF CHECK BITS 

INC R4 

(GET NEXT SET OF CHECK BITS 

MOVB PTABLE(R4).R2 

(SHIFT TO LINE UP IN CSR 

(ENABLE OIAG MODE 

(GET CHECK BITS TO BE WRITTEN 

MOV R2.CSR 

(LOAD CSR WITH DATA 

(WRITE DATA TO TEST ADDRESS 

MOV RO.(Kl) 

(CLEAR CSR 
(CORRECT SBE 

(READ CSR FOR CORRECT SBE BIT AND SYNDROHES 
(CLEAR ALL BU T .SB E INDICATOR 
(WAS DATA COBfSiEDM?/ 

^ CMP CSR.«20 
BEQ L217 

MOV #20. GOOD 
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nTP020 SYNDROMES TO CSR ON SINGLE BIT ERROR TEST 



SEQ 0216 





026150 


013737 


002150 


0472 


026156 


104060 




S473 


026160 
026160 






0474 


026160 


104514 




0475 


026162 


104426 




0476 


026164 


042737 


174033 


0477 


026172 








026172 


116403 


026310 


0470 


026176 


072327 


000005 


0479 


026202 


052703 


000004 


0400 


026206 








026206 


020337 


002150 




026212 


001411 




0401 


026214 








026214 


012737 


177777 


0402 


026222 








026222 


010337 


002044 


0403 


026226 








026226 


C13737 


002150 


0404 


026234 


104042 




0405 


026236 
026236 






0406 


026236 


005011 




0407 


026240 








026240 


123727 


002264 




026246 


001002 




0400 


026250 


006305 




0409 


026252 
026252 
026254 


000402 




0490 


026254 


000261 




0491 


026256 


006105 




0492 


026260 
026260 






0493 


026260 








026260 


023727 


002324 




026266 


001276 






026270 






0494 


026270 


005100 




0495 


026272 








026272 


123727 


002264 




026S00 


001252 






026S02 






0496 


026S02 


104503 




0497 


026S04 


104423 




0496 


026306 


000207 





0499 

0500 
0501 
0502 



8503 



002052 



002150 



002612 



002052 



000001 



000020 



000002 



ERROR *60 

END 

SYNREG 
REAOCSR 

BIC ♦tC3744,CSR 

LET RS :B- SBESYN(R4) 

ASH «5.R3 
BIS ♦BIT2.R3 
IF R3 NE CSR 



SET HEADER 
LET GOOD :- R3 
LET BAD CSR 
ERROR *42 

END 

CLR (Rl) 

IFB PASFLG EQ «1 



ASL 
ELSE 



SEC 
ROL 



R5 



R5 



026310 


016 


013 


023 


026313 


025 


026 


031 


026316 


032 


034 


043 


026321 


045 


046 


051 


026324 


052 


054 


061 


026327 


064 







I 
I 

SBESYN: 



END 

UNTIL BITNO EQ «16. 



COM RO 
UNTILB PASFLG EQ «2 



CLRICSR 

CACHON 

RETURN 

MSVll-P 

.BYTE 



MOV CSR. BAD 

sNO ERROR 

L217:iju!S 
s ENABLE SYNDROME BIT REGISTER 
J GET SYNDROMES FROM CSR 
jMASK SYNDROME BITS 
I GET GOOD SYNDROMES 

MOVB SBESYN(R4).R3 

J SHIFT INTO POSITION 
iSET DIAG MODE IN DATA 
;D0 SYNDROME BITS AGREE 

CMP R3.CSR 
BEQ L220 

' MOV *-l. HEADER 

MOV R3.G00D 
MOV CSR. BAD 

I 

L220:i:it:: 

{CLEAR LUT 

: SHIFT NEU DATA DEPENDING ON PASFLG 

CMPB PASFLG. •! 
8NE L221 

! SHIFT BITNO TO THE LEFT 

' BR L222 

L221 

tSET CARRY BIT AND 

;ROTATE LEFT 

L222: :::::: 
:UNTIL ALL BITS ARE DONE 

CMP BITNO. *16. 
BNE B32 

: COMPLEMENT DATA AND* REPEAT 
: UNTIL 2 PASSES ARE COMPLETE! 

CIM PASFLG. •2 

BNE 831 

E31: : I : t I : 

t CLEAR CSR 
;TURN CACHE 



SINGLE BIT ERROR SYNDROME BIT TABLE 
16.13.23.25.26.31.32.34.43.45.46.51.52.54.61.64 
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MTP020 SYNOROMES TO CSR ON SINGLE BIT ERROR TEST 



SEa 0217 



8505 


026330 




nTPA21 : 


SU8TST 


<<MTPA21 


MARCHING 


I'S C O'S PATTERN TEST>> 








(•SUBTEST 


MTPA21 


MARCHING I'S e 0 


• 5 PATTERN TEST 


8506 








s READ . BYTESUAP-MOOIF Y . READ . DOUN 




8507 


026330 


014100 


1 t - 


MOV 


-CRID.RO 


J V177640 




8508 


026332 


020200 




CMP 


R2.R0 


IV177642 




8509 


026334 


001401 




BEQ 


21 


JV177644 




8510 


026356 


104443 




PERR17 




(V177646 




8511 
















8512 


026340 


000311 


21 : 


SUAB 


(Rl) 


SV177650 




8513 


026342 


011100 




MOV 


CRD.RO 


iV 177652 




8514 


026344 


020300 




CMP 


R3.R0 


IV177654 




8S15 


026346 


001401 




BEQ 


3* 


tV177656 




8516 


026350 


104444 




PERR20 




JV177660 




8517 
















8518 


026352 


0204C1 




CMP 


R4.R1 


iV177662 


; DONE ? 


8519 


026354 


001365 




BNE 


11 


: V177664 


I NO - LOOP 


8520 


026356 


000207 




RETURN 




JV177666 


i YES - RETURN 


8521 
















8522 


026360 




liTPB21 : 


1 READ . BYTESUAP-MOOIFY . READ . UP 




8523 


026360 


011100 


1$ ; 


MOV 


CRD.RO 


IV177640 




8524 


026362 


020300 




CMP 


R3,R0 


I V 177642 




8525 


026364 


001401 




BEQ 


21 


;V 177644 




6526 


026366 


104444 




PERR20 




1V177646 




8527 
















8528 


026370 


000311 


21 : 


SWAB 


(Rl) 


JV177650 




8529 


026372 


011100 




MOV 


CRD.RO 


JV177652 




8530 


026374 


020200 




CMP 


R2.R0 


JV177654 




8531 


026376 


001401 




BEQ 


31 


IV1776S6 




8532 


026400 


104443 




PERR17 




tV177660 




8:33 
8534 


026402 


062701 000002 


31 : 


ADD 


•2.R1 


iV177662 




8535 


026406 


020501 




CMP 


R5.R1 


JV177666 




8536 


026410 


001363 




BNE 


11 


;V177670 


; NO - LOOP 


8537 


026412 


000207 




RETURN 




JV177672 


jYtS - RETURN 


8538 
















8539 


026414 




f1TPC21: 


1 READ . BYTESUAP -MODIFY . READ . UP 




8540 


026414 


011100 


11 : 


MOV 


(RD.RO 


tV177640 




8541 


026416 


020200 




CMP 


R2.R0 


IV177642 




8542 


026420 


001401 




BEQ 


21 


JV177644 




8543 


026422 


104443 




PERR17 




iV177646 




8544 






















21: 


SUAB 


CRD 


JV177650 




8546 


026426 


011100 




MOV 


CRD.RO 


IV177652 




8547 


026430 


020300 




CMP 


R3,R0 


JV177654 




8548 


026432 


001401 




BEQ 


31 


iV1776S6 




8549 


026434 


104444 




PERR20 




:V177660 




8550 
















8551 


026436 


062701 000002 


34: 


ADD 


*2.R1 


J V 177662 




8552 


026442 


020501 




CMP 


R5.R1 


iV 177666 


iOONE? 


8S5S 


026444 


001363 




BNE 


11 


J V177670 


jNO - LOOP 


8554 


026446 


000207 




RETURN 




:V177672 


:YES - RETURN 



CvnjAeo nsvii-j nENOOr ozag. rMCRO ros. 02 
MTPA21 HMCHING I'S e O'S PATTERN TEST 
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SEQ 0216 



6557 
6556 
6559 
8560 
6561 
6562 
656S 
6564 
6565 
6566 
8^67 
6566 
8569 
8570 
6571 
0572 



026450 
026450 
026452 
026454 
026456 

026460 
026462 
026464 
026466 
026470 

026472 
026474 
026476 



014100 
020300 
001401 
104444 

OOOSll 
011100 
020200 
001401 
104443 

020401 
001565 
000207 



MTP021 1 
1*: 



2*. 



3t. 



t READ . B r TESUAP - MQOIF Y . RE AO . DOUN 
MOV -(Rl).R0jV177640 
CnP R3.R0 JV177642 

BEQ 2* :V177644 
PERR20 iV177646 



SUAB 

nov 

CMP 
BEQ 

PERR17 

CMP 
BNE 

RETURN 



«.R1) 
CRD.RO 
R2.R0 
31 



R4.R1 
It 



JV177650 
JV177652 
;V177654 
SV177656 
;V177660 

IV177662 
5V177664 
: VI 77666 



sDONE? 
:N0 - LOOP 
:YES - RETURK 



cvnjABO nsvii-j nEnooT 
nTPA2i n/MCHZNC I'S e 



DZAG. MACRO Y0S.02 
O'S PATTERN TEST 
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SEO 02 19 



















A^77 








■ w 








ll*17« 
















A^A 1 

O JO L 












012757 


www A 




096506 






ASA? 


026506 










02S727 


002364 




026514 


001005 




6505 


0?6516 








026516 


013702 


002336 


8564 


026522 








026522 


013703 


002614 


6585 


026526 








026526 


000404 






026550 






8566 


026530 








026530 


013702 


002614 


8587 


026534 








026534 


013703 


002336 


6568 


026540 








026540 






6569 


026540 








026540 


005037 


002366 




026544 







8590 
6591 
6592 
8593 

8594 

6595 



6596 
6597 

6596 

8599 



026544 
026546 
026546 
026554 
026554 
026560 
026560 
026560 
026564 
026566 
026566 
026572 
026574 
026602 
026602 
026602 
026606 
026610 
026614 
026614 
026614 
026620 
026622 
026622 



104423 

013737 
012701 



020127 
101032 

005737 
002003 
012737 



032701 
001002 
00SSS7 



005737 
001404 

010211 



MTP022: SUBTST 



t 'SUBTEST 



<<MTP022 
nTP022 



REFRESH £ SHIFTING DIAGONAL TEST>> 



002364 



000001 



REFRESH e SHIFTINT ^TAGONAL TEST 
**•••**««*••**•*•********• * ■•>, 

td) UE URITE A DIAGONAL PATTERN IN HEnORY (WITH CACHE ON). 
I (2) IF A REFRESH TEST UE DISTONd ALL ROUS FOR > 2 NS (UITH CACHE ON). 
I (3) UE READ e CHECK FOR CORRECT CSS THE DIAGONAL PATTERN 
I (UITH CACHE OFF). 

KOIAG-8. iHCU OFTEN A DIAGONAL STRIPE OCCURS (HUST BE A POUER OF 2) 

FOR EVEN :- «1 TO «2 |FCR DATA C COHPLEHENT DATA 

NOV •I. EVEN 
B33: 1 1 1 1 1 1 

IF EVEN EQ «1 

CHP EVEN.«1 
BNE L225 

ZEROS 

nOV ZEROS. R2 

ONES 

nOV 0NES.R3 



002366 
060000 

157776 

002370 
000007 

000374 
002370 

002370 



002370 



002370 



LET R2 
LET R3 
ELSE 



LET R2 :- ONES 

LET RS ZEROS 
END I OF IF EVEN 
FOR STRIPES «0 TO #K0IA6-1 

t URITE LOOP 
CACHON 

LET COUNT :- STRIPES 
LET Rl :- fFIRST 
UHILE Rl LOS tLAST 



BR L226 
L22S : : 1 1 > t i 

NOV 0NES.R2 

nOV ZEROS. R3 

L226 : t : t i t : 
iFOR THE NUMBER OF STRIPES 
CLR STRIPES 
B34 : 1 1 > s : i 



I TURN CACHE ON 



B35: 



IF COUNT LT 40 THEN LET COUNT :- MOIAG-l 



nOV STRIPES. COUNT 

NOV •FIRST. Rl 

> s > i i I 

CHP R1.#LAST 
BHI L227 



IF *S74 OFF. IN Rl THEN LET COUNT :- COUNT 



IF COUNT NE #0 



LET (Rl) :- R2 



TST COUNT 
BGE L230 

nOV «K0I AG -1. COUNT 
L230: 1 1 1 1 1 1 
- #1 

BIT •374. Rl 
BNE L231 
DEC COUNT 
L231: 1 1 { 1 1 1 

TST COUNT 
BEO L232 

NOV R2.(R1) 



CVfUA»0 

riTP022 



nsvii-J rcnoRY OZAG. riACRO Y0S.02 
RCFRCSH e SNXFTZNC DIAGONAL TEST 



MOl 



02*424 

oImIo 

02MS0 000403 



010241 000002 




MOT 



0244S4 010941 000002 



024440 005SS7 002S70 
024444 

024444 042701 



024490 
024490 
024492 
024492 



00074S 



4409 
•410 



4411 

8412 

S41S 
•414 



024492 

024492 0097S7 002004 
024454 001002 
024440 0047S7 027054 
024444 



024444 

024444 01S7S7 002S44 002370 
024472 

024472 012701 040000 
024474 104424 
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LET 2(R1) :- R2 
ELSE 

LET (Rl) R3 

LET 2(R1) :- R3 
END I OF IF COUNT 
LET COUNT :• COUNT - #1 
LET Rl :- Rl * 44 
END I OF UHILE 

I END OF URITE LOOP 

IF DIAGFLAG IS FALSE THEN »CALL REFRESH 



SEQ 0220 



J READ LOOP 
LET COUNT 

LET Rl i 

CACHOFF 



STRIPES 
•FIRST 



nOV R2.2(R1) 

BR L233 
L232 : 1 1 1 1 1 1 

NOV RS.(Rl) 

NOV RS.2CR1) 

L233: 1 1 1 1 1 1 

DEC COUNT 

ADD 44. Rl 

BR B35 

L227:;iiiii 
ESS : I I 1 1 S I 



TST DIAGFLAG 
BNE L234 
JSR PC. REFRESH 
L234: 1 1 1 1 1 1 



J TURN CACHE OFF 



NOV STRIPES. COUNT 
NOV 4FIRST.R1 



CVMJABO MSVll-J MEMORY DIAG. MACRO ¥05.02 
MTP022 REFRESH fi SHIFTING DIAGONAL TEST 



6616 


026700 




026700 






026700 


020127 




026704 


101046 


8617 


026706 




026706 


005737 




026712 


002003 




026714 


012737 




026722 




S616 


026722 






026722 


032701 




026726 


001002 




026730 


005337 




026754 




8619 


026794 




026734 


005737 




026740 


001412 


5620 


026742 






026742 


A4 4 4 A A 

011100 


S621 


026744 






026744 


A^AOAA 

0^0200 




026746 


001401 


S622 


026730 


4 V 

104443 


S623 


026752 
026752 




S624 


026732 






026732 


A 4 ^ 1 AA 

016XOO 


S625 


A'>^ 

026736 






026736 


A'^AQAA 

020200 




026760 


AA 4 ^ A 4 

00140I 


MX ^X 

S626 


A^^ 1 

02676^ 


4 AAAA V 


S627 


A*X A 

026764 
0?6764 




0620 


026764 






A^^ 

026764 


0004XX 




A^^ 

026766 




S629 


026766 






026766 


A4 4 4 AA 


S630 


026 7 70 






Aox "n A 
026770 






026772 


001401 


S6S1 


A^X 

026774 




6632 


026776 

/\^x 

025776 




AX V V 

S6S3 


A'^X ^^X 

026776 






026776 


A4 £ 4 A A 

016 lOO 


AH XA 








027002 


020300 




027004 


001401 


0635 


027006 


104444 


S636 


027010 
027010 




8637 


027010 
027010 




0638 


027010 






027010 


D05337 


8639 


027014 
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WHILE Rl LOS ♦LAST 



SEQ 0221 



IF COUNT LT *0 THEN LET COUNT 



BS6 :;:;!>! 

CMP R1,#LAST 
BHI L2S5 

«KDIAG-1 

TST COUNT 
6GE L236 

MOV *KDI AG -1, COUNT 
L236: I I i I I > 

IF #374 OFF. IN Rl THEN LET COUNT COUNT #1 ^ 

BIT *374.R1 

BNE L237 
DEC COUNT 
L237: ! its:: 



IF COUNT NE #0 

LET RO :■ (Rl) 
IF R2 NE RO 

PERR17 
END iOF IF R2 

LET RO !• 2(R1) 

IF R2 NE RO 

PERR17 
END {OF IF R2 

ELSE 

LET RO :- (Rl) 
IF R3 NE RO 

PERR20 
END ;0F IF RS 

LET RO :- 2(R1) 

IF R3 NE RO 

PERR20 
END :0F IF R3 

END :0F IF COUNT 

LET COUNT :» COUNT 

LET Rl :- Rl ♦ #4 



«1 



TST COUNT 
BEQ L240 

MOV (Rl).RO 

CMP R2.R0 
BEQ L241 



L241: : : : : : s 

MOV 2(R1).R0 

CMP R2.R0 
BEQ L242 

L242:::::i: 

BR L243 
L240: :::::: 

MOV (Rl).90 

CMP R3.R0 
BEQ L244 

L244 : I : i : : : 

MOV 2(R1).R0 

CMP R3.R0 
BEQ L245 

L245: 1 1 1 i i s 
L243: wwM 

DEC COUNT 



CVMJABO nSVll-J MEMORY OIAG. MACRO Y0S.02 
HTP022 REFRESH t SMirTING DIAGONAL TEST 



027014 
6640 027020 
027020 
027022 
027022 

6641 
6642 

6643 027022 
027022 
027026 
0270S4 
027036 

6644 027036 
027036 
027042 
0270S0 
027052 

6645 027052 
6646 

6647 027054 



6646 



062701 
000727 



005237 
023727 
003643 



005237 
023727 
003616 

000207 



000004 



8649 


027054 








027054 


012700 


060000 




027060 






8650 


027060 


004737 


027124 


8651 


027064 








027064 


062700 


000004 




027070 


020027 


060374 




027074 


003771 






027076 






8652 


027076 








027076 


012700 


120000 


8653 


027102 
027102 








027102 


020027 


020372 




027106 


101005 




8654 


027110 


004737 


027124 


8655 


027114 








027114 


062700 


000004 


8656 


027120 
027120 
027122 
027122 


000770 




8657 


027122 


000207 




8658 


027124 


012704 


000640 


8659 


0271S0 


062700 


000002 


6660 


027154 


005140 




8661 


0271S6 


005120 




8662 


027140 


005110 




8663 


027142 


005110 






027144 


077405 




8665 


027146 


162700 


000002 


6666 


027152 


000207 





Monday 07-0ct-8S 16:57 Pag* 250-1 



END I OF UHILE 



SEO 0222 



002366 

002366 000007 



002364 

002364 000002 



I END OF READ LOOP 
END I OF FOR STRIPES 



END I OF FOR EVEN 



RETURN 

REFRESH :SUBTST <<SUBR REFRESH DELAY >> 



ADD M.Rl 

BR 836 

L235: HUM 
E36: t i i i 1 1 



INC STRIPES 
CMP STRIPES. tKOI AG -2 
BLE B34 
E34: a i i i i 1 > 

INC EVEN 
CMP EVEN. #2 
BLE B33 
£33: I : s : > : > 



;*SUBTEST 



SU6R 



REFRESH DELAY 



(DISTURB EACH ROW FOR > 3.2 MS 

FOR RO :- ♦FIRST TO #FIRST*374 BY #4 



CALL REFSUB 
END iOF FOR RO 



LET RO ♦FIRST»BIT14 
UHILE RO LOS «LAST*BIT14*374 



CALL REFSUB 

LET RO :- RO * *4 



B37: 



MOV •FIRST. RO 



ADO «4.R0 
CMP R0,#F1RST»374 
BLE B37 
E37: : s i i s I i 



B40:i 



nOV •FIRST *BIT14.R0 



CMP R0.#LAST»BIT14»374 
BHI L246 





END :0F 


UHILE 




RETURN 




REFSUB: 


MOV 


•640. R4 




ADD 


•2.R0 


11: 


COM 


-CRO) 




COM 


CRO)» 




COM 


(RO) 




COM 


C^O) 




SOB 


R4.lt 




SUB 


•2.R0 




RETURN 





ADD •4.R0 

BR B40 
L246 : : s t : s : 



E40: i ; I > 1 1 
:TIME FOR A > 3.2 MS LOOP 



CVMJAeO MSVll-J MEMORY DIAG. 
SUBR REFRESH DELAY 

8669 027154 



6670 
8671 
8672 
8673 
8674 
8675 
8676 
8677 
8678 
8679 
8680 
8681 
8682 
8683 
8684 
8685 
8686 
8687 
8688 
8689 
8690 
8691 
8692 
8693 
8694 

8695 027154 

8696 027156 

8697 027160 

8698 027162 
6699 

8700 027164 

8701 027166 

8702 027170 

8703 027} 72 
8704 

8705 027174 

8706 027200 
6707 027202 
6708 

6709 027204 

6710 027210 
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SEQ 0c23 



MTPA24: SUBTST <<MTPA24 



FAST GALLOPING PATTERN TEST>> 



I •SUBTEST MTPA24 FAST GALLOPING PATTERN TEST 



011100 
020004 
001401 
104447 

011200 
020003 
001401 
104450 

062702 000400 

020205 

101764 

062701 000002 
000137 027214 



II: 



21: 



3$: 



THE TOTAL TEST (INCLUDING SETUP) IS AS FOLLOUS 



RO 



THIS TEST WRITES THE MEMORY WITH A BACK GROUND PATTERN 
STORED AT LOCATION BAKPAT 

TEST BEGINS AT LOWEST LOCATION BEING TESTED 
(LETS NAME IT ' A' ) 

LETS NAME THE 1ST LOC/sTION IN THE ROW/COLUMN UNDER TEST AS 
SWAPS BYTES FOR LOCATION 'A'. 
READS 'A' . READS 'B' 

•B' - '6'»400 (ADOS 64 DOUBLE WORDS TO B) 
REPEATS STEPS 5 AND 6 UNTIL 'B' IS GREATER THAN THE 
END OF THE BANK A*2 

REPEATS STEPS 5-6 UNTILL 'A' REACHES THE END OF THE BANK 
AFTER EXECUTING THE TEST DATA IS COMPLEMENTED 
AND STEPS 1-9 ARE REPEATED 
AS FOLLOWS 



•(1) 

• (2) 

• (3) 

• (4) 

• (5) 
*(6) 
*(7) 
*(8) 
*(9D 
*(10) 

REGISTERS ARE USED 



TEST DATA 



iRl 


• A' 






:R2 


•B' 






>R3 


BAKPAT 






iR4 


SWAPAT 






>RS 


LAST 






J NOTE THE PATTERN 


STARTS AT MTPB24 • • 


1 1 1 1 1 1 1 1 1 1 1 1 


:UIPAR' 


S 






MOV 


(Rl).RO 


tV 177640 


sREAD 'A' 


CMP 


R0.R4 


JV177642 


{CHECK 'A' 


BEQ 


21 


;V177644 


iBR IF OK 


PERR23 




IV177646 


: REPORT ERROR 


MOV 


(R2).R0 


8V177650 


sREAD 'B' 


CMP 


R0.R3 


iV177652 


J CHECK 'B' 


BEQ 


31 


iV177654 


;BR IF OK 


PERR24 




:V177656 


s REPORT ERROR 


ADO 


#400, R2 


SV177660 


:BUMP 'B' 


CMP 


R2.R5 


J V 177664 


:AT END YET? 


BLOS 


11 


iV177666 


:6R IF NO 


ADD 


*2.R1 


5V177670 


iBUMP 'A' 


JMP 


0«MTPB24 


SV177674 


tGOTO V177260 



CVMJABO nSVll-J MEMORY DIAG. MACRO Y05.02 
MTPA24 FAST GALLOPING PATTERN TEST 
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SEQ 0224 



871S 027214 



0722 
0723 
0724 
0725 
8726 
8727 
8728 
8729 



027230 010102 

027232 011100 

027234 020004 

027236 C01401 

027240 104447 

027242 000137 027174 



MTPB24: SUBTST 



i*SUBTEST 



<<MTPB24 
MTPB24 FAST 



FAST GALLOP PART B>> 
GALLOP PART B 



8714 








iSOPAR' 


S 






8715 


027214 


010411 




MOV 


R4.(R1) 


IV172260 


tURITE 'A' 


8716 


027216 


020105 




CMP 


R1.R5 


iV172262 


iOONE? 


8717 


027220 


001001 




BNE 


1» 


IV172264 


iBR IF NO 


8718 


027222 


000207 




RETURN 




J VI 72266 


lYES - RETURN 


8719 


027224 


000137 027230 


1*: 


JMP 


JWMTPC24 


IV172270 


(GOTO V 172360 


8720 












8721 


027230 




MTPC24 : 


SUBTST 


<<MTPC24 


FAST GALLOP 


PART C>> 



i*SUBTEST 



MTPC24 FAST GALLOP PART C 



1): 



iKOPAR' 

MOV 

MOV 

CMP 

BEQ 

PERR23 

JMP 



R1.R2 
CRD.RO 
R0.R4 
II 

8«MTPA24*20 



tV172S60 
IV172362 
:V172364 
>V 172366 
:V172370 
iV172372 



RESET 'B' <-- 
READ 'A' 
CHECK 'A' 
BR IF OK 
REPORT ERROR 
GOTO V177660 



CVMJM80 MSVXl-J MtMOHY OIAG. 
MTPC24 TAST GALLOP PART C 

8732 027246 



8733 027246 

8734 027252 

8735 0272S4 

8736 027256 

8737 027260 
8738 

8739 027262 



8740 
8741 
6742 
6743 
8744 
8745 
8746 
8747 
8748 
8749 
8750 
8751 
8752 
8753 
8754 
8755 
8756 
8757 



027262 
027266 
027270 
027272 
f »7274 
027276 
027S00 
027302 
027304 
027306 
027312 
027314 



027316 



8771 027336 

8772 027340 

8773 027544 

8774 027346 

8775 027350 



000137 
010221 
010321 
077005 
000207 



0001?.7 
020221 
001401 
104451 
005127 
000000 
020321 
001401 
104451 
005167 
077015 
000207 



8758 






8759 






8760 






8761 






8762 






8763 


027316 


073427 


8764 


027322 


060305 


8765 


027324 


005504 


8766 


027326 


060204 


8767 


027330 


<)62 /ns 


8768 


027334 


«)0u240 


8769 






8770 


027SS6 
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MTPA26: SUBTST <<MTPA26 RANDOM DATA CURXTE)>> 



SEQ 0225 



(•SUBTEST 



MTPA26 RANDOM DATA (WRITE) 



027316 



II: 



JMP 
MOV 
MOV 
SOB 

RETURN 



S«MTPC26 
R2,CR1)* 
R3.CR1)* 
RO.ll 



1V177640 
IV177644 
I V 177646 
IV177650 
IV177652 



GOTO V172360 



MTPB26: SUBTST <<MTPB26 RANDOM DATA CREAD)>> 

MTPB26 RANDOM DATA (READ) 



i*SUBTEST 



027316 



177764 



111 



21: 

RANOOD: 



3l! 



.DSABL 

.ENABL 

JMP 

CMP 

BEQ 

Pk'RR2S 

COM 

0 

CMP 

BEQ 

PERR25 

COM 

SOB 

RETURN 
.DSABL 
.ENABL 



AMA 

LSB 

S«MTPC26 
R2.(R1)* 
2> 

(PC)» 

R3.(R1)* 
31 

RANOOD 
RO.ll 

LSB 
AMA 



IV177640 
iV177644 
IV177646 
J V 177650 
JV177652 
JV177654 
JV177656 
;V177660 
iV177662 
;V177664 
JV177670 
SV177672 



GOTO V172360 



FOR ERROR REPORTING 



MTPC26: SUBTST <<RANOQM NUMBER SUBPROGRAM>> 



>*SUBTEST 



RANDOM NUMBER SUBPROGRAM 



CALLER MUST 
MOV 



ASHC 

ADD 

ADC 

ADD 

ADD 

NOP 



MOV 
MOV 
MOV 
•7.R4 
R3.RS 
R4 

R2.R4 
♦1057. R5 



SETUP 

SEEDL0.R3 
SEEDHI.R2 
R3.R5 
R2.R4 



iV172360 
:V 172364 
:V172S66 
SV172370 
;V172372 
IV172376 



GOTO VI 72260 



005504 

062704 047401 

010503 

010402 

000137 027252 



MTPD26: SUBTST <<RAN00M NUMBER SUBSUBPRaGRAn>> 

i*SUBTEST RANDOM MJMBER SUBSUBPROGRAM 

I******************************************************************************* 

ADC R4 iV172260 

ADD «47401.R4 tV172262 

MOV R5.R3 1V172266 

MOV R4.R2 i VI 72270 

JMP 8«MTPA26«4 |V172272 GOTO V177644 



CVMJA80 MSVll-J MEMORY OIAG. 
RANDOM NUMBER SUBSUBPROGRAM 

8776 027354 
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SEQ 0226 



8779 027354 

8780 027556 

8781 027360 

8782 027362 
8783 

8 J4 027364 



8785 
8786 
8787 
8788 
8789 
8790 
8791 
8792 
8793 
8794 
8795 
8796 
8797 
8798 
8799 
8800 
8601 
6802 

saos 

6604 

6605 
8606 
8607 



011002 
010220 
077103 
000207 



MTP030: SUBTST <<MT0030 



FLUSH GUT OBE'S>> 



j»SUBTEST 



MT0030 FLUSH OUT DBE'S 



1$: 



MOV (R0),R2 

MOV R2.(R0)* 

SOB Rl.l* 
RETURN 



MTP031: SUBTST <<MTP031 



JV177640 
JV177642 
JV177644 
1V177646 

S0B-A-L0N6 TEST>> 









J ♦SUBTEST 


MTP031 SOB -A -LONG TEST 










.OSABL 


AMA 




027364 


000000 






0 




sMOVE TERMINATOR 


027366 


077001 




1«: 


SOB 


R0.1» 


iSOB TILL RO UNDERFLOWS 


027370 


005167 


177772 




COM 


1( 


» WRITE COMPLEMENT OF SOB 


027374 


020167 


177766 




CMP 


Rl.ll 


{READ e CHECK FOR NOT "SOB 


027400 


001403 






BEQ 


21 


sOK - SKIP 


027402 


104454 






PERR30 






027404 


010167 


177756 




MOV 


Rl.l* 




027410 


005167 


177752 


2«: 


COM 


1« 


: CORRECT SOB INSTRUCTION 


027414 


010200 






MOV 


R2.R0 


(REINITIALIZE SOB CONSTANT 










J UPDATE 


MOVE REGISTERS 




027416 


010503 






MOV 


R5.R3 




027420 


005725 






TST 


(R5)* 


jBUMP (SAFELY) BY 2 


027422 


010504 






MOV 


RS.R4 




027424 


020537 


002522 




CMP 


RS.8«LINK1 


s DONE 7 


027430 


001001 






BNE 


3» 


]N0 - SKIP 


027432 


000207 






RETURN 




sYES 


027434 


014344 




31: 


MOV 


-(R3).-(R4) 




027436 


001376 






BNE 


It 




027440 


000752 






BR 


1* 






000056 




S0BLENGTH-,-MTP031 












.ENABL 


AMA 





CVMJA80 riSVll-J MEMORY OIAG. 
MTPOSl SOe-A-LONG TEST 

8835 027442 



8836 
8837 
8838 
8839 
8840 

8641 027442 
8S42 027444 

8643 027446 

8644 027450 

8645 027452 

6646 0274S4 

6647 027460 

8646 027462 

8849 027464 

8850 027466 

8851 027470 
6852 027472 
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SEQ 0227 



MTP032: SUBTST <<MTP032 



URITE RECOVERY TEST>> 



(•SUBTEST 



MTP032 URITE RECOVERY TEST 



J THE TEST ACTUALLY EXECUTED ALREADY IN THE MEMORY UNDER TEST. 

I THIS CODE INSURES THAT IT CHANGED MEMORY TO HAVE 
jl/2 BANK OF #5141 WHICH IS A "COM -CRD" INSTRUCTION AND 

}l/2 BANK OF #110 WHICH IS A "JMP (RO)" INSTRUCTION. 



012401 


It: 


MOV 


(R4)«.R1 


IV177640 


J GET DATA FROM LOWER 1/2 


020102 




CMP 


R1.R2 


JV177642 


J IS IT #51417 


001401 




BEQ 


2» 


JV177644 


J YES - SKIP 


104430 




PERR02 




IV177646 


(NO - TAKE ERROR TRAP 


077305 


2«: 


SOB 


R3.1» 


;V177650 


:LOOP FOR 1/2 BANK 


013705 002522 




MOV 


SM.INK1.RS 


IV177652 


, RESTORE LOOP SIZE 


012400 


31: 


MOV 


(R4)^,R0 


IV177656 


;GET DATA FROM UPPER 1/2 


020005 




CMP 


R0.R5 


JV177660 


:IS IT #110? 


001401 




BEQ 


At 


IV177662 


sYES - SKIP 


104427 




PERROl 




:V177664 


:N0- TAKE ERROR TRAP 


C77305 


41: 


SOB 


R3,3I 


;V177666 


iLOOP FOR 1/2 BANK 


000207 




RETURN 







CVnjABO nSVll-J MEnORY DIAG. 
MTP032 WRITE RECOVERY TEST 

8855 027474 
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SCO 0228 









M%7 


027474 


000000 




027476 


000000 


8859 


027500 


000261 


8860 


027502 


105511 


8861 


027504 


100402 


8862 


027506 


105212 


8863 


027510 


000773 


8864 






8865 






8866 


027512 


102401 


8867 


027514 


104461 


8868 






8869 


027516 


000242 


8670 


027520 


105212 


6871 


027522 


103402 


8872 


027524 


102001 


8873 


027526 


100401 


8674 


027SS0 


104461 


6675 






6876 






6877 






6878 


027532 


010701 


8679 


027534 


162701 


8880 


027540 


010102 


8681 


027542 


005202 


8882 






6663 






6664 


027544 


010503 


8885 


027546 


005725 


8886 


027550 


010504 


6887 






8888 






8889 


027552 


020537 


8890 


027556 


001001 
000207 


6891 


027560 


6892 






8893 






6694 


027562 


014344 


8895 


027564 


001376 


8696 


027566 


005011 


6897 


027570 


000743 


6898 




000076 


8899 







MTP033: SU8TST <<MTP033 
!*SUBTEST nTP03S BRANCH GOBBLE TEST 



BRANCH GOBBLE TEST>> 



.DSABL AHA 
0 

BGTEST: 0 

BRGOBB: SEC 

ADCB (Rl) 
Bfll It 
INCB (R2) 
BR BRGOBB 



1«: 
21: 

31: 



4*1 

51; 



]NOU CHECK FOR CORRECT 



BVS 
PERR35 

CLV 
INCB 
BCS 
BVC 

Bni 

PERR3S 



2» 



(R2) 
3» 
3$ 
41 



(DONE? 

CMP 

BNE 

RETURN 



R5.S«LINK1 
61 



tnOVE CODE 1 LOCATION 
6<: MOV -(R3).-CR4) 

BNE 6* 

CLR (Rl) 

BR BRGOBB 
GBLENGTH- . -nTP033 

.ENABL AHA 



iMOVE TERMINATOR 

I TEST WORD (TWO BYTES) 

J SET CARRY (TO BE ADDED TO "BGTEST") 

, INCREMENT LOU BYTE OF "BGTEST" 

{BRANCH WHEN BIT7 IS SET 

; INCREMENT HIGH BYTE OF "BGTEST" 

I LOOP 128 TIMES 

CONDITION CODES 
iBR IF V-BIT SET (SHOULD BE) 
{KO - REPORT ERROR AND ABORT TEST 
tCONO COOES NOT EQUAL TO 1010 
(CLEAR V-BIT 

; INCREMENT HIGH BYTE OF "BGTEST" ONCE MORE 

iBR IF C-BIT SET (SHOULD NOT BE) 

>BR IF V-BIT CLEAR (SHOULD NOT BE) 

sBR IF N-BIT SET (SHOULD BE) 

sNO - REPORT ERROR AND ABORT TEST 

iCOND CODES NOT EQUAL TO 1010 



J UPDATE TEST POINTERS 

MOV PC.Rl 

SUB «S* -BGTEST. Rl 

MOV R1,R2 

INC R2 

jUPDkTE move REGISTERS 
MOV RS.R3 
TST (R5)» 
MOV RS.R4 



(BUMP (SAFELY) BY 2 



; DONE 7 

J NO - SKIP 

:YES - RETURN 



(CLEAR TEST WORD "BGTEST" 
sRUN MOVED CODE AGAIN 



cvnjAeo nsvii-j rcnoRv oiag. 

nTP0S3 BRANCH GOBBLE TEST 
S901 027572 
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SEQ 0229 



6902 
6903 
6904 
6905 
6906 
6907 
6906 
6909 
6910 
6911 



027572 
027S74 
027576 
027600 
027602 
027604 
027606 
027610 
027612 
027614 



010220 
077102 
000207 
012401 
020102 
001402 
104430 
000240 
077306 
000207 



MTP034: SU6TST <<MTP034 



SOFT ERROR - BACKROUNO PATTERN TEST>> 



|*SUBTEST 



nTP034 SOFT ERROR - BACKROUNO PATTERN TEST 



1»: 
2*: 

31: 



MOV 
SOB 

RETURN 

MOV 

CMP 

BEO 

PERR02 

NOP 

see 

RETURN 



R2.(R0)* 
R1.MTP034 

(R4)».R1 

R1.R2 

3$ 



R3.2I 



iV177640 
JV177642 
iV177644 
tV177646 
IV177650 
IV177652 
JV177654 
IV177656 
JV177660 
;V177662 



CVMJABO MSVll-J HEMORY OlAG. MACRO Y05.02 
nTP034 SOFT ERROR - BACKROUND PATTERN TEST 
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SEQ 0250 



0913 027616 



f1TP055:SUBTST 



6914 
8915 
S916 



J917 
S9ia 
8919 
0920 
0921 
0'»22 
8V23 
6924 
6925 
0926 
0927 
6926 
6929 
8930 
6931 
6932 
6933 
6934 
8935 
6956 
6937 
6936 
8939 
8940 



6941 
6942 
6943 



t*SUBTEST 



<<f1TP03S WORST CASE NOISE PARITY TEST>> 

f1TP0S5 WORST CASE NOISE PARITY TEST 



027616 012737 000003 002076 



027624 
027624 
027630 
027630 
027636 
027640 
027646 
027650 
027652 
027656 
027660 
027664 
027672 
027674 
027676 

027700 
027702 
027704 
027712 
027714 
027722 
027724 
027726 
0277S2 
0277S4 
027740 
027740 
027744 
027750 
027752 

027752 
027756 



012700 

012737 
104425 
012737 
011010 
005710 
010037 
104050 
004737 
032763 
001002 
104426 
104512 

104503 
011010 
012737 
104425 
012737 
005710 
000405 
010037 
104050 
004737 

062700 
020027 
003727 



005037 
000207 



060000 
000005 
027674 

002034 

050354 
002000 



000001 
027726 

0020S4 
050554 

004000 

157776 

002076 



MOV 43.N0PAR I SET PARITY TRAPS TO RETURN TO -PARTHERE' 

FOR RO tFIRST TO tLAST BY MOOO 



002150 
002504 



002666 



002150 
002504 



II: 



21: 



NOV «eiT2!BIT0.CSR 
LOAOCSR 

MOV «1I.PARTHERE 
MOV (RO).(RO) 
TST (RO) 
MOV RO. ADDRESS 
ERROR *50 
CALL PERBNK 

BIT •BIT10.C0NFIG*2(R5) 

BNE 21 

REAOCSR 

ERRGEN 



MOV #FIRST.RO 
B41: 1 i I i 1 1 

(SET WRITE WRONG PARITY £ PAR. TRAPS INTO CSR 



WUP TEST LOCATION 



5t; 
41: 



CLRICSR 

MOV (RO).(RO) 
MOV «BITO.CSR 
LOAOCSR 

MOV •SI.PARTHERE 
TST (RO) 
BR 41 

MOV RO. ADDRESS 
ERROR *50 
CALL PERBNK 
ENDi OF FOR 



I CLEAR WRONG PARITY IN MEMORY 



ADO #4000. RO 
CMP RO.#LAST 
6LE B41 
E41: i t ( I : ; i 



CLR 

RETURN 



NOPAR 



I RESET PARITY TRAP ACTION 



OVMJA80 nSVll-J MEMORY DIAG. 
riTP035 WORST CASE NOISE PARITY 

8945 027760 
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TEST 



SEQ 0231 



nTP036: SUBTST 



i aSUBTEST 



««t1TP036 CORRECTION CODE TEST>> 

nTP0S6 CORRECTION CODE TEST 



8946 






8947 






894S 






8949 






8950 027760 


104424 




8951 027762 


105037 


002264 


8952 027766 


104513 




8953 027770 






027770 






6954 027770 






027770 


105237 


002264 


8955 027774 






027774 


A 4 "^tAA 

012704 


177777 


8956 090000 






050000 


AAK A V ^ 

005037 


002924 


89S7 090004 






090004 


123727 


002264 


0S0012 


AA4 AAV 

001009 




8958 090014 






090014 


A« "^^AK 

012705 


AAAAA4 

000001 


8959 090020 






090020 


0O04O2 




AV AA'%'% 

090022 






AAAA AVAA'%t 

0960 050022 






050022 


012705 


177770 


A A^ 4 AVAA'k^ 

8961 090026 






AV AA'^A 

090026 






8962 090026 






090026 






8963 






A AAA AVAAtA 

8964 090026 


005257 


002924 


MAAtf AVAAVt 

8965 090092 






090092 


005204 




8966 090094 






ASAAV A 

090094 


116402 


090164 


AAA^ AVAAAA 

0967 0000#0 


072227 


000003 


AAAM AVAAAA 

8968 090044 


052702 


000004 


MA^A AVAAKA 

0969 050050 






AV AAKA 

090050 


A« A'^V^ 

010297 


002130 








8971 0S0056 






090056 


010011 




8972 090060 


005711 




8979 050062 






0S0062 


021105 




0S0064 


001412 




8974 030066 






0S0066 


0127S7 


060000 


6975 0S0074 






0S0074 


010237 


002314 


8976 030100 






OSOlOO 


010537 


002246 


8977 030104 







i THIS TEST CHECKS TO SEE THAT EACH BIT OF A DATA UORO 
I CAN BE CORRECTED INDIVIDUALLY FROM A ZERO TO A ONE AND 
t VISA VERSA. 



000001 



002034 



CACHOFF 
CLRB PASFLG 
CBREG 
REPEAT 

LET PASFLG :B- PASFLG * •! 
LET R4 :- •-I 
LET BITNO :- #0 
IFB PASFLG EQ •! 

LET R5 :- ♦! 
ELSE 

LET R5 •177776 

END 
REPEAT 



INC BITNO 

LET R4 R4 > •! 

LET R2 :B- PTABLE(R4) 

ASH •5.R2 
BIS #6112. R2 
LET CSR :- R2 



LOAOCSR 
LET (Rl) 



RO 



TST (Rl) 

IF (Rl) NE R5 



LET ADDRESS :- «60000 
LET CHECK :- R2 
LET TSTDAT R5 
LET TSTDAT*2 :- (Rl) 



J TURN OFF CACHE 
I CLEAR PASFLG 

I ENABLE CHECK/SYNDROME BIT REGISTER 

B42 : 1 i ; » 1 1 
; INCREMENT LOOP COUNTER 

INC8 PASFLG 
t INDEX TO SINGLE BIT ERROR TABLE 

nOV «-l.R4 
I CLEAR INNER LOOP COUNTER 

aR BITNO 

; SELECT DATA TO BE CORRECTED BY PASSNO 

CHPB PASFLG. #1 
6NE L247 

iOATA-0:BIT TO BE CORRECTED IS A ONE 

NOV «1.R5 

BR L250 
L247:jt;iii 
iDATA-177776tBIT TO BE CORRECTED IS A ZERO 

NOV #177776. R5 

t 

L2S0:;:.-.ti 

r 

B4S : 1 1 1 1 < : 

J INCREMENT BIT POINTER 
I POINT TO NEXT SET OF CHECK BITS 

INC R4 

»CET NEXT SET OF CHECK BITS 

MOVB PTA8LE(R4).R2 

(SHIFT TO LINE UP IN CSR 

(ENABLE DIAG MODE 

(GET CHECK BITS TO BE URITTEN 

MOV R2.CSR 

(LOAD CSR WITH DATA 

iURITE DATA TO TEST ADDRESS 

MOV RO.(Rl) 

(CORRECT SBE 

(WAS DATA CORRECTED??? 

CMP (Rl).RS 
BEQ L251 
(MOV ERROR INFORMATION IN 

MOV #60000. ADDRESS 

MOV R2. CHECK 

' MOV R5. TSTDAT 
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HTP056 CORPCCTXON CODE TEST 





030104 


011157 


002250 








nOV (Ri:.TST0AT*2 


8970 


030110 


104052 








ERROR *S2 


iNO ERROR 


www 


030112 










END 


1 

L251 • 1 1 1 1 1 1 


0960 


030112 


005011 








CLR CRD 


1 CLEAR LUT 


6961 


030114 










IFB PASFLG EQ *t 


(SHIFT NEM DATA DEPENDING ON PASFLG 


050114 
050122 


125727 
001002 


002264 


000001 






CNPB PASFLG. 61 
BNE L252 


0962 


030124 


006305 








ASL R5 


! SHIFT BITNO TO THE LEFT 


6963 


030126 
050126 
030130 


000402 








ELSE 


BR L253 

: 1 1 1 1 ! 1 


«*964 


030130 


000261 








bEC 


»SET CARRY BIT AND 


6965 


030132 


006105 








ROL R5 


: ROTATE LEFT 


6966 


050134 
030134 










END 


L253 1 1 2 1 1 1 1 


0967 


030134 










UNTIL BITNO EQ 


; UNTIL ALL BITS ARE DONE 




050134 


023727 


002324 


000020 






CNP BITNO. #16. 




050142 


001351 










BNE B43 




030144 












E45 s 1 1 1 c 1 1 


6966 


050144 


005100 








con RO 


:COnPLEnENT DATA AND REPEAT 


6969 


050146 










UNTILB PASFLG EQ »2 


i UNTIL 2 PASSES ARE COMPLETE! 




050146 


125727 


002264 


000002 






CNPB PASFLG. 62 




030154 


001305 










BNE 842 




050156 












E42: us; 1 1 


6990 


050156 


104505 








CLRICSR 


(CLEAR CSR 


6991 


030160 


104425 








CACHON 


iTURN CACHE 


6992 


050162 


000207 








RETURN 


t 


6993 
















6994 










i 


MSVll-P SINGLE BIT 


ERROR CHECK BIT TABLE 


6995 










PTA8LE: 






6996 


050164 


002 


007 


037 


.BYTE 2,7.37.31.32.25.26.20.57,51.52.45.46.40.75.70 




030167 


051 


032 


025 










050172 


026 


020 


057 










050175 


051 


052 


045 










050200 


046 


040 


075 










050205 


070 













CvnjABO nsvii J rcnORY oiag. 
nrpou coMiecTioN cooc test 

8«98 050204 



a«99 

9000 
9001 
9002 
9003 
90O4 



900S 

900* 

9007 

900« 
9009 

9010 



fOll 

9012 

901S 
9014 

9015 
9016 



OS0204 
0S02O6 
090206 
0S0212 
0S0212 
050216 
050220 
050220 
050226 
050250 
050250 
050252 
050252 
050254 
050256 
050256 
090242 
050242 
090250 
050252 
050252 
050252 
050254 



104424 

005057 

005057 
104475 

012737 
104475 

005011 

005711 
001406 

011157 

012737 
104037 



104423 

000207 
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nTP0S7: SUBTST <<»rrP037 CHECK ECC DISABLE TEST>> 



SCQ 0255 



(•SUBTEST 



1TP057 CHECK ECC DISABLE TEST 



I THIS TEST CHECKS THAT ECC CAN BE DISABLED AND THAT 
I NO CORRECTION TAKES PLACE UITH ECC DISABLED. 



002044 
002514 

000100 002514 



002052 
060000 



002054 



CACHOFF 

LET GOOD :- #0 
LET CHECK :- *0 



CBICSR 
LET CHECK 

CBICSR 
LET (Rl) : 



♦100 



•0 

IF (Rl) NE #0 

LET BAD :- (Rl) 
LET ADDRESS 
ERROR *37 

END 

CACHON 
RETURN 



;TURN OFF CACHE 

I 6000 DATA FOR ERROR PRINT OUT 

CLR 6000 

I CLEAR CHECK BIT FIELD 

CLR CHECK 
I ENABLE SYNOROHE/CHECK BIT REGISTER 
tS8E CHECK BITS 

NOV •lOO.CHECK 

(WRITE CHECK BITS TO CB REGISTER 
(WRITE CHECK BITS TO HENORY 



(WAS CORRECTION HADE? 7? 7 

(YES IT WAS ERROR 

•60000 ( 



aR (Rl) 

TST (Rl) 
BEQ L2S6 

NOV (Rl).BAO 

NOV 660000. ADDRESS 



(TURN ON CACHE 



L256 :;((:(( 



CVMJABO MSVU-J MEMORY OIAG. 
MTP037 CHECK ECC DISABLE TEST 

9019 030256 



9020 
902 X 
9022 
9023 
9024 
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9025 
9026 
9027 

9028 



9029 

9030 
9031 
9032 

9033 
9034 

9035 

9036 

9037 
9038 

9039 
9040 
9041 



030256 
030256 
030262 
030266 
030272 
030272 
030276 
030276 
030302 
030306 
03v;306 
030312 
030316 
030320 
030320 
030320 
030324 
030324 
030330 
030330 
030334 
030334 
030342 
030344 
030344 
030346 
030350 
030352 



013704 
072427 
042/04 



012701 
162701 

105037 
C05037 
104475 



105237 

062700 

062701 

012737 
104475 

005011 
104503 
005711 
104426 



002102 
000011 
170037 



012700 177740 



060000 
004000 

002264 
002314 



002264 
000040 
004000 
001340 



002314 



MTP041: SUeiST <<MTP041 



ADDRESS TO CSR ON DOUBLE BIT ERROR TEST>> 



!*SUBTEST 



MTP041 ADDRESS TO CSR ON DOUBLE BIT ERROR TEST 



t THIS TEST CHECKS TO SEE IF THE CORRECT ADDRESS APPEARS 
i IN CSR BITS 5-11 ON A DOUBLE ERROR. 



LET R4 :■ BANK 



iGET STARTING BANK NUMBER 

nOV B'^NK R4 

1 SHIFT INTO POSTION TO MATCH ADDRESS IN CSR 
I CLEAR OFF EXTRANEOUS BITS 

iINIT CSR ADDRESS TO 0 • IK (BIT 5 - IK ADD.) 

MOV *-40.R0 

LET Rl :- WFIRST - «4000 iGET LOU ADDRESS XN BANK 

MOV «FIRST.R1 
SUB «4000.R1 

lINIT PASFLG 

CLRB PASFLG 
(CLEAR CHECK BIT FIELD TO BE LOADED 
{ENABLE CHECK/SYNDROME BIT REGISTER 



ASH «9. .R4 
BIC •tC7740.R4 
LET RO :- «-40 



LET PASFLG :B- «0 



CLR CHECK 
CBICSR 
REPEAT 



INCB PASFLG 

LET RO M * «40 

LET Rl :- Rl * «4000 

LET CHECK :- «1340 



B44 : { : I t i i 

J INC LOOP COUNTER 

tINC CSR ADDRESS TO BE EXPECTED 

ADD MO.RO 



(DOUBLE ERROR CHECK BITS 



CBICSR 
LET (Rl) 

CLRICSR 
TST (Rl) 
READCSR 



ADD •4000, Rl 
MOV *1340. CHECK 



«0 



I WRITE DOUBLE ERROR CHECK BITS 
sURITE DATA AND D.E. CHK BITS AT A-0 

CLR (Rl) 

■CLEAR CSR 

I READ ADDRESS TO GET DOUBLE ERROR 
:READ CSR FOR CORRECT ADDRESS 



SEQ 02'< 
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SCO 0235 



9042 


0S0SS4 






0S0SS4 


013705 


9045 


030360 


042705 


9044 


030364 






030364 


010002 


9045 


030366 


060402 


9046 


030370 


000240 


9047 


030372 






030372 


020205 




030374 


001405 


9048 


030376 






030376 


010237 


9049 


030402 






030402 


010537 


9050 


030406 


104455 


9051 


030410 






030410 




9052 


030410 






030410 


C05011 


9053 


030412 


104475 


9054 


030414 






030414 


123737 




030422 


001336 




030424 




9055 


030424 


104503 


9056 


030426 


000207 


9057 







LET R5 CSR 

BIC #tC7740.R5 

LET R2 :- RO 

ADD R4.R2 

NOP 

ir R2 NE R5 



LET BAD : 
LET GOOD 
PERR31 



R2 
• R5 



EHO 
LET (Rl) 



«0 



MOV CSR.R5 



IgET CORRECT ADDRESS 

MOV R0.R2 

(ADD STARTING BANK TO DOUBLE BIT ADDRESS 

I DEBUG AIDE 

sDO ADDRESSES AGREE? 

CMP R2.R5 
BEQ L257 

MOV R2,BA0 

MOV R5.G000 



CBICSR 
UNTILB PASFLG EQ PASCNT 



CLRICSR 
RETURN 



NO ERROR 



L257 



: s : ! i s ( 



CLR (Rl) 

ENABLE CHECK/SYNDROME BIT REGISTER 
00 16K AT A TIME 

CMPB PASFLG. PASCNT 
BNE B44 

£44:;::::: 



CVMJA80 MSVll-J MEMORY 
MTP041 ADDRESS TO CSR 

9060 0S0430 



9061 
9062 
9063 
9064 
9065 
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SEQ 0256 



9066 


030430 


104424 




9067 


030432 








030432 


013704 


002102 


9068 


030436 








030436 


023727 


002102 




030444 


001004 




9069 


030446 








030446 


012737 


000001 


9070 


030454 
030454 
030456 


000403 




9071 


030456 








030456 


012737 


000002 


9072 


030464 
030464 






9073 


030464 


042704 


177607 


9074 


030470 


072427 


000002 


9075 


030474 


052704 


040000 


9076 


030500 


062737 


000400 


9077 


030506 








030506 


105037 


002264 


9078 


030512 








030512 


013705 


002102 


9079 


030516 


042705 


177770 


9080 


030522 


072527 


A AAA • * 

000011 


9081 


030526 


052705 


A A A A ^ A 

000020 


9082 


030532 


104513 




9083 


030534 
030534 






908* 


030904 






9085 


030540 








030540 


012737 


000104 


9086 


030546 


104425 




9087 


030550 
030550 


005011 




9088 


030552 


104503 




9089 


030554 


005711 




9090 


030556 


104426 




9091 


030560 


042737 


020000 


9092 


030566 








030566 


023705 


002150 




030572 


001406 




9093 


030574 








030574 


013737 


002150 


9094 


030602 








030602 


010537 


002044 


9095 


030606 


104023 




9096 


030610 







MTP042: SU8TST 
•SUBTEST 



<<MTP042 EXTENDED ADDRESS TO CSR ON ERROR TEST>> 

MTP042 EXTENDED ADDRESS TO CSR ON ERROR TEST 



THIS TESTS THE EXTENDED Q-BUS 
CSR BY CAUSING A SINGLE ERROR, 
FOR THE PROPER ADDRESS IN iHE 



CACHorr 

LET R4 



BANK 
IF BANK EQ «177 



LET PASCNT :- 01 



ELSE 



LET PASCNT :• 02 

END 

BIC «tC170.R4 
ASH •2.R4 
BIS «eiT14,R4 
ADO MOO.KIPARS 
LET PASFLC :B- «0 

LET R5 BANK 

BIC ♦tC7.R5 
ASH «9. .RS 
BIS «6IT4.R5 
CBREG 
REPEAT 

INCB PASFLG 
LET CSR :- #104 



LOAOCSR 
LET CRD 



«0 



CLRICSR 
TST (Rl) 
REAOCSR 

BIC «6IT13.CSR 
IF CSR NE R5 THEN 



LET BAD :- CSR 
LET GOOD R5 
ERROR *23 



ADDRESS IN THE 

ENABLING BIT • 14. THEN CHECKING 
CSR. 

jTURN OFF CACHE MEMORY 

(GET BANK NUMBER TO FIGURE OUT EXTENDED ADDRESS 

MOV BANK.R4 



sCO ONCE IN LAST BANK 



L261 



CMP BANK, #177 

BNE L261 

MOV #1, PASCNT 

BR L262 

: : : s ) s 

MOV «2. PASCNT 



L262: i s : i : s 

: CLEAR OFF LOUER BITS 

J SHIFT TO LINE UP WITH CSR 

:SET EXTENDED ADDRESS BIT 

iSET UP PAR TO POINT TO TOP OF A BANK 

:INIT LOOP COUNTER 

CLRB PASFLG 

tRS GETS THE BANK NUMBER 

MOV eANK.R5 

: CLEAR ALL BUT THE LOUER BITS 
sROTATE INTO POSTION 

I SET UP SBE INDICATOR ; sDATA TO BE EXPECTED 
: ENABLE CHECK/SYNDROME BIT REGISTER 

B4S: i ; s i • : 

iINCR LOOP COUNTER 

:URITE CHECK BITS TO CSR WITH DIAG flOOE 

MOV •W.CSR 

:LOAD CSR UITH DATA 

:URT ZEROS AT A-0 AND SINGLE ERROR BITS 

CLR (Rl) 

•CLEAR CSR 

iREAD A -0: DATA BIT 0 SHOULD BE CORRECTED TO A 
:REAO CSR FOR DATA 

s CLEAR POSSIBLE INHIBIT MODE IN DATA "CSR" 
tHAS SINGLE ERROR BITS SET IN CSR? 

CMP CSR.R5 
BEQ L263 

' MOV CSR. BAD 

MOV R5.G000 



END 
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050610 






9097 


030610 








030610 


012737 


040000 


9096 


030616 


104425 




9099 


030620 


104426 




9100 


030622 


042737 


020000 


9101 


030630 








030630 


023704 


002150 




030634 


001411 




9102 


030636 








030636 


013737 


002150 


9103 


030644 








030644 


010437 


002044 


9104 


030650 








030650 


012737 


177777 


9105 


030656 


104023 




9106 


030660 
030660 






9107 


030660 
030660 


COSOll 




9106 


030662 








030662 


012701 


137776 


9109 


030666 


062705 


000740 


9110 


030672 


052704 


001000 


9111 


030676 


104513 




9112 


030700 








030700 


123757 


002264 




030706 


001312 






030710 






9113 


030710 


104503 




9114 


030712 


104423 




9115 


030714 


000207 
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LET CSR :- «40000 t WRITE EQ8 BIT TO CSR 



SEO 0257 



LOAOCSR 
READCSR 

BIC MIT13.CSR 
IF CbR NE R4 THEN 



LET BAD :• CSR 
LET GOOD R4 
SET HEADER 
ERROR *23 



L263; i 1 1 1 1 1 

nOV MOOOO.CSR 



(READ FOR CORRECT EXTENDED 0-BUS ADDRESS 
s CLEAR INHIBIT MODE POINTER IN DATA 
I READ EQB ADDRESS 

CMP CSR.R4 
BEQ L264 

MOV CSR. BAD 

' MOV R4.G00D 

MOV • 1. HEADER 



END 
LET (Rl) 
LET Rl :« 



:■ #0 
♦137776 



: CLEAR LUT 

:SET UP NEW ADDRESS 



ADD »740.R5 
BIS «BIT9.R4 
CBREG 



L264: s t ; > : : 

CLR (Rl) 
MOV •137776. Rl 



UNTILB PASFL6 EQ PASCNT iLOOP 2 TIMES 



:A0D TO GET NEW ADDRESS 
sSET BIT 9 SINCE UE ARE ASSERTING Al ON PASS2 
; ENABLE CHECK/SYNDROME BIT REGISTER 



CLRICSR 

CACHON 

RETURN 



: CLEAR CSR 

I TURN ON CACHE 



E45: 



CMPB PASFLG. PASCNT 
BNE B45 



cvnjA80 nsvii-j heiory diag. 

nTP042 EXTENDED ADDRESS TO CSR 
9117 030716 



9118 
9119 
9120 
9121 
9122 
9123 
9124 
9125 
9126 
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ON ERROR TEST 

riTP043: SUBTST <<t1TP043 URITE BYTE CLEARS SINGLE BIT ERROR TEST>> 



SEQ 0238 



.♦SUBTEST 



HTP043 URITE BYTE CLEARS SINGLE BIT ERROR TEST 



t THIS TEST CHECKS TO SEE ir A SINGLE BIT ERROR WILL BE CORRECTED DURING 
> THE READ PORTION Or A URITE BYTE AND THAT THE CORRECT CHECK BITS UILL 
s BE GENERATED ON A URITE. 



9127 

9126 

9129 
9130 

9151 
9132 

9153 
9154 

9135 
9136 
9157 

9138 

9139 

9140 
9141 

9142 
9143 
9144 



030716 
030720 
030722 
030726 
030726 
030730 
030732 
030732 
030736 
030736 
030736 
030742 
050742 
050750 
030752 
030752 
050754 
030756 
030756 
030762 
030764 
030772 
030772 
031000 
031002 
031002 
051010 
051010 
051016 
051020 
031020 
031020 
031022 
051024 



104424 

104515 
105057 

010102 
005202 



002264 



012704 000001 



105257 

012757 
104425 

010411 
104503 

112712 
104426 
042737 

023727 
001407 

012757 

015737 
104060 



104513 
005711 
104426 



002264 
000604 



000377 
177757 
002150 

000020 
002150 



002150 



002150 
000020 

002044 
002052 



CACHOFf 
CBREG 

CLRB PASFLG 
LET R2 :- Rl 



*l 



LET R4 

REPEAT 



«1 



INCB PASFLG 
LET CSR :• #604 



LOAOCSR 
LET (Rl) 



R4 



CLRICSR 

LET CR2) :B- ♦377 

REAOCSR 

BIC «tC20.CSR 

IF CSR NE «20 



LET GOOD : 
LET BAD :> 
ERROR »60 

END 

CBREG 
TST (Rl) 
READCSP 



• 920 
CSR 



(TURN OFF CACHE 

I ENABLE CHECK /SYNDROME BIT REGISTER 
(CLEAR LOOP COUNTER 
|R2 POINTS TO HIGH BYTE 

MOV R1.R2 
INC R2 

{INITIAL DATA - 1 

MOV ♦1.R4 

B46:ii:iti 

(INCREMENT LOOP COUNTER 

(WRITE CHECK BITS CORRESPONDING TO DATA OF 0 

MOV 4604. CSR 

(WRITE CSR 

(WRITE DATA OF 1 CREATING A SINGLE BIT ERROR 

MOV R4.(R1) 

(WRITE CSR TO NORMAL MODE 
(WRITE BYTE OF WORD 



(READ CSR 

(SEE IF SBE INDICATOR IS SET 
(IS SBE SET????? 



MOVB «377.(R2) 

CMP CSR.«20 
BEQ L266 

MOV 420. GOOD 

MOV CSR. BAD 



L266 : ( { { i 
(WRITE CSR TO DIAG MODE 
(READ SAO FOR CORRECT CHECK BITS 
(REAC CSR 
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SEQ 0239 



9145 


031026 


042737 


174037 


002150 


9146 


031034 










031034 


023727 


002150 


000300 




031042 


001412 






9147 


031044 










031044 


012737 


177777 


002612 


9146 


031052 








031052 


012737 


000300 


002044 


9149 


031060 










031060 


013737 


002150 


002052 


9150 


031066 


104061 






9131 


091070 
031070 








9152 


031070 


005302 






9153 


031072 










031072 


012704 


000400 




9154 


031076 










031076 


123727 


002264 


000002 




031104 


C01314 








031106 








9155 


031106 


104423 






9156 


031110 


000207 







BIC •tC3740.CSR 
IF CSR NE •300 



SET HEADER 
LET GOOD :- MOO 
LET BAD :■ CSR 
ERROR *61 

END 

DEC R2 

LET R4 :- MOO 

UNTILB PASFLG EQ 92 



CACHON 
RETURN 



(MASK OUT CHECK BIT FIELD 

lUERE CORRECT CHECK BITS GENERATED????? 

CMP CSR. 9300 
BEQ L267 

MOV t-l. HEADER 

MOV •300. GOOD 

' MOV CSR. BAD 

! 

L267: ( i 1 1 > t 
I POINT TO HIGH BYTE AND REPEAT 
I BIT 0 OF HIGH BYTE 

MOV •400.R4 

:D0 HIGH AND LOU BYTE 

CMPB PASFLG. #2 
BNE B46 

E46: 

:TURN ON CACHE 
I 
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SEQ 0240 



9158 031112 



9159 
9160 
9161 
9162 
9163 
9164 
9165 



9166 
9167 

9168 

9169 
9170 

9171 

9172 

9173 
9174 
9175 

9176 

9177 

9178 

9179 

9180 
9181 

9182 
9183 
9184 
9185 
9186 
9187 

9188 

9189 
9190 

9191 
9192 

9193 
9194 



031112 
031112 
031112 
031114 
031114 
031120 
031120 
031124 
031126 
031126 
031132 
031132 
031132 
031132 



031136 
031136 
031142 
031142 
031142 
031142 
031146 
0S1146 
031150 
031150 
031154 
031156 
031156 
031160 
031162 
031164 
031166 
031170 
031172 
0S1172 
031176 
031200 
031202 
031202 
031206 
031212 
031212 
031214 
031216 
031216 
031222 



104424 

105037 

012705 
104475 



010204 

010237 
104425 

005011 
005105 
010546 
040416 
040504 
052604 

010437 
104425 
104426 

013703 
04270S 

020304 
001412 



002264 
174037 



C12702 000046 



105237 002264 



005037 002266 



005237 002266 



002150 



002150 



0021S0 
020000 



mP044: SUBTST 
•SUBTEST 



<<MTP044 SHIFTING CHECK BITS THROUGH J»E CSR TEST>> 

HTP044 SHIFTING CHECK BITS THROUGH THE CSR TEST 



THIS TEL. CHECKS THE ABILITY TO READ AND WRITE CHECKBITS INTO HENORY 
BY SHIFTING A ONE BIT THROUGH A FIELD OF ZEROS. THE CSR IS READ FOR THE 
CORRECT PATTERNS. THE TEST IS THEN REPEATED ON A ZERO BIT THROUGH A 
FIELD OF ALL ONES. 



REPEAT 

CACHOFF 
LET PASFLG 

LET R5 



B- *0 
♦174037 



CBICSR 

LET R2 :- «46 
REPEAT 

LET PASFLG 



:B- PASFLG * «1 



LET PASSNO :- «0 
REPEAT 

LET PASSNO :- PASSNO 

LET R4 R2 

LET CSR R2 



* «1 



LOAOCSR 
LET (Rl) 



«0 



con R5 

NOV R5.-(SP) 
BIC R4,(SP) 
BIC R5.R4 
BIS (SP)*.R4 
LET CSR R4 



LOAOCSR 
REAOCSR 
LET R3 : 



CSR 



010137 002034 



BIC *BIT13.R3 
IF R3 NE R4 THEN 



LET ADDRESS :- Rl 
LET GOOD R4 



iILCi >REV B 

B47 : J J 1 1 i I 

{TURN OFF CACHE 
:INIT PASFLG 

CLRB PASFLG 

s CHECK BIT MASK FOR CSR 

MOV #1 74037. R5 
: ENABLE CHECK/SYNDROME BIT REGISTER 
tSET UP INITIAL CSR DATA 

MOV •46. R2 

B50: : s i t i : 
I INC LOOP COUNTER 

INCB PASFLG 

tCHK BITS - 1 

I DISABLE ECCiOIAG CHK SET 

ilNIT PASSNO( INNER LOOP COUNTER) 

CLR ^ASSNO 



B51: 

tINC LOOP COUNTER 



i § 9 » 1 1 

INC PASSNO 
J COPY R2 TO R4 

MOV R2 R4 

iGET CSR DATA TO BE WRITTEN 

MOV R2.CSR 
; WRITE SBE CHECK BITS TO CSR 
: WRITE DATA AND CHECK BITS AT A'O 

CLR (Rl) 

I COMPLEMENT MASK 
J SAVE R5 ON STACK 
(CREATE AN XOR FUNCTION 

i 

i 

* MOV R4.CSR 

iLOAD CSR WITH COMPLEMENT CHECK UlTS 
I READ CSR FOR COMPLEMENT CHECK BITS 
tCOPY CSR DATA TO R3 

MOV CSR.R3 
J CLEAR ANY POSSIBLE INHIBIT MODE POINTER 
:REAO CSR FOR PROPER CHECK BITS 

CMP RS.R4 
BEQ L271 

' MOV Rl. ADDRESS 
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9195 

9196 

9197 
9196 

9199 
9200 
9201 
9202 
9205 
9204 

9205 
9206 



9207 

9208 

9209 

9210 

9211 
9212 

9213 
9214 



9215 
9216 
9217 



9218 
9219 
9220 
9221 
9222 
9223 
9224 
9225 
9226 
9227 
9228 
9229 

9230 

9231 



051222 
031226 
031226 
031232 
031232 
031240 
031242 
031242 
031242 
031244 
031246 
031250 
031252 
031256 
031256 
031260 
031262 
031262 
031266 
031270 
031270 
031274 
031274 
031302 
031302 
031306 
031306 
031314 
031316 
031316 
031316 
031320 
031320 
031326 

031330 
031332 
031332 
031334 
031334 
031336 
031340 
031342 
031344 
031346 
031350 
031352 
031354 
031356 
031360 
031362 
031562 
031362 
031362 
031366 
031366 
031374 



002044 

002052 

177777 002612 



010437 

010337 

012737 
104463 

005105 
005711 
000240 
104426 
040537 

010204 
040504 

020437 
001413 

010437 

013737 

010137 

012737 
104464 

040502 

123727 
001002 

006302 

000413 

005105 
010546 
040216 
040502 
052602 
006302 
010546 
040216 
040502 
052602 
005105 



062702 000006 

123727 002266 000006 
001262 



002150 

002150 
002044 

002150 002052 
002034 

177777 002612 



002264 000001 



LET BAD :• R3 
SET HEADER 
PERR37 

END 

COM R5 
TST (Rl) 
NOP 

READCSR 
BIG RS.CSR 
LET R4 :- R2 

BIC R5.R4 
IF R4 NE CSR 

LET GOOD :- R4 
LET BAD :- CSR 
LET ADDRESS 
SET HEADER 
PERR40 

END 

BIC R5.R2 

IFB PASFLG EQ 91 



ASL R2 
ELSE 



COM 
MOV 
BIC 
BIC 
BIS 
ASL 
MOV 
BIC 
BIC 
BIS 
COM 
END 



R5 

R5.-(SP) 

R2.CSP) 

R5.R2 

(SP)*.R2 

R2 

R5.-(SP) 

R2.(SP) 

R5.R2 

CSP)*.R2 

R5 



LET R2 :- R2 * «6 
UNTILB PASSNO EQ «6 



SEQ 0241 

MOV R4.G000 

MOV R3.BAD 

' MOV «-l. HEADER 

t ERROR CALL t iILCi iREVB 

L271 : I t ( I s t 

(COMPLEMENT MASK 

tREAD CHECK BITS AT A-O INTO CSR 

IrEAD CSR FOR CORRECT CHECK BITS 

I MASK OUT CHECK BIT FIELD 

sGET CHECK BITS THAT WERE WRITTEN 

MOV R2.R4 
sMASK OUT CHECK BIT FIELD 
(ARE CHECK BITS THE SAME? 

CMP R4.CSR 

BEQ L272 

' MOV R4.G000 

MOV CSR. BAD 

' MOV Rl. ADDRESS 

' MOV #-1. HEADER 

sERROR CALL i<ILC:iREVB 

L272:tt:ss: 

: SHIFT CHECK BITS AND CREATE NEW DATA FOR CSR 
{SELECT FUNCTION 

CMPB PASFLG. #1 

BNE L273 
tDO A FIELD OF ZEROS- -->ONES 
i SHIFT CHECK BITS 
:D0 A FIELD OF ONES --->ZEROS 

BR L274 
L273: : i i 1 1 1 

iTAKt OUT CHECK BIT FIELD 

> 

I 

I SHIFT CHECK BITS 

tPUT BACK CHECK BIT FIELD 



IcOMPLEMENENT DATA PATTERN 
L274 : 1 1 : i i : 

lADD 6 SO THAT WRITE ON CSR WILL ENABLE DIAG MODE 

ADD «6.R2 

:D0 ALL CHECK BITS 

CMPB PASSNO. M 
BNE B51 
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031376 

9232 031376 

031376 012702 003706 

9233 031402 

031402 123727 002264 000002 

031410 001250 

031412 

9234 031412 104503 

9235 031414 005011 

9236 031416 062701 000100 

9237 031422 

031422 020137 002562 
031426 001231 
031430 

9238 031430 104423 

9239 031432 000207 



LET R2 #3706 
UNTILB PASFLG EQ #2 



CLRICSR 
CLR (Rl) 

ADO noo.Ri 

UNTIL Rl EQ ENOAOO 



CACHON 
RETURN 



SEQ 0242 



ESI : s 1 1 I > : 
i REPEAT WITH FIELD OF ONES 

hOV •3706. R2 

CHPB PASFLG.#2 
BNE B50 

E50 : 1 1 1 I > i 



;ALL 256 TO ADDRESS 



sTURN ON CACHE 



:ILCiiREVB 
ilLCiiREVB 
trip Rl.ENDAOO 
BNE B47 
E47: i i t s i s 



cvnjASO nsvii-J rcnoRV 

nTP044 SHIFTING CHECK 
9241 031454 



9242 
9243 
9244 
9245 
9246 
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SEO 0243 



HTP045: SUBTST <<nTP045 SYNDROHES TO CSR ON DOUBLE BIT ERROR TEST>> 

' nTP045 SYNOROHES TO CSR ON DOUBLE BIT ERROR TEST 



i*SUBTEST 



i' 







t flAAOA 
XU*4c4 




9240 


















AVI AAf\ 






v29v 


ATI AAA 








AX1 AAA 


VXc tot 














031452 


012737 


003144 




ATI AAA 






9253 


031460 


C05237 


002266 


9254 


031464 


104425 




9255 


031466 
031466 


005011 




9256 


031470 


104503 




9257 


031472 


005711 




9256 


031474 


104426 




9259 


031476 








031476 


032737 


100000 




031504 


001007 




9260 


031506 








031506 


012737 


177777 


9261 


031514 








031514 


013737 


002150 


9262 


031522 


104063 




9263 


031524 
031524 






9264 


031524 


104514 




9265 


031526 


104426 





002044 

002150 



002150 

002612 
002052 



THIS TEST CHECKS TO SEE IF THE DOUBLE BIT ERROR INDICATOR IS SET 

ON A DOUBLE BIT ERROR AND THE CORRECT SYNOROHES ARE LATCHED INTO THE 

CSR. THIS TEST IS THEN REPEATED UITH MULTIPLE ERROR CHECK/SYNDROHE BITS 



CACHOFF 
CBRE6 

LET PASSNO :- «0 
LET GOOD #3744 
LET CSR :- «3144 
REPEAT 



(TURN OFF CACHE 

{ENABLE CHECK/SYNOROnE BIT REGISTER 
(CLEAR LOOP COUNTER 



iGOOO DATA 

tOBE CHECK BITS FOR CSR 
i 



INC PASSNO 
LOAOCSR 
LET (Rl) :• 



CO 



CLRICSR 
TST (Rl) 
READCSR 

IF MIT 15 OFF. IN CSR 



SET HEADER 
LET BAD CSR 
ERROR *63 



END 

SYNREG 
READCSR 



CLR PASSNO 
HOV 43744.0000 
MOV 43144. CSR 



B52 : ( t ; i i I 

luRITE D6E CHECK BITS TO CSR 
: WRITE ZEROS AND OBL ERROR CHK BITS A-0 

CLR (Rl) 

: CLEAR CSR OUT 

:REAO A-O TO GET DOUBLE BIT ERROR 
iUAS UNCORRECABLE ERROR BIT SET? 7 7 



sBIT NOT SET 



BIT 46IT15.CSR 
BNE L300 

HOV 4-1. HEADER 

HOV CSR. BAD 



L300: ::::]: 
s ENABLE SYNDROHE BIT REGISTER 
tREAD CSR FOR CORRECT SYNOROHE BITS 
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nTP04S SYNOAOnCS TO CSR ON DOUBLE BIT ERROR TEST 



SEQ 0244 



9266 


OwxSSO 


000240 


7CD f 


0427S7 




nxi SAO 








02S737 






001407 










OS 1550 


013757 




0S155& 






031556 


012757 




031564 


104042 




031566 
031566 




9273 


031566 


005011 


9274 


031570 






031570 


012757 


9275 


031576 






031576 


012757 


9276 


031604 






031604 


C25727 




031612 


001522 




031614 




9277 


031614 


104505 


9278 


031616 


104425 


9279 


031620 


000207 



174055 002150 

002150 002044 

002150 002052 

177777 002612 



005604 002044 
005004 002150 
002266 000002 



NOP 

BIC #tC3744.CSR 

IF CSR NE GOOD THEN 



LET BAD :- CSR 
SET HEADER 
ERROR *42 

END 

CLR (Rl) 

LET GOOD #3604 
LET CSR :- •3004 
UNTIL PASSNO EQ #2 



CLRICSR 

CACHON 

RETURN 



DEBUG AIDE 

MASK SYNDROMES OUT 

CHECK IF DOUBLE ERROR BIT 15 SET 

CMP CSR. GOOD 
BEQ L501 

{BAD DATA 

MOV CSR. BAD 
MOV #-1. HEADER 

> 
I 

L301: i i < > I I 

J CLEAR LUT 

(REPEAT WITH MULTIPLE ERROR SYNDROMES 

MOV #5604. GOOD 

; MULTIPLE ERROR CHECK BITS 

MOV #5004. CSR 

CMP PASSNO. #2 
BNE B52 

E52 : : t s > : : 
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SEQ 0245 



9261 031622 



nTP046: SU8TST 



{•SUBTEST 



<<nTP046 CHECK SINGLE BIT ERRORS WITH ECC DISMLED>> 

MTP046 CHECK SINGLE BIT ERRORS UITH ECC DISABLED 



9262 










1 


926S 










1 THIS TEST CHECKS TO SEE 


9264 










i IS TREATED LIKE A UNCORI 


926S 










t ARE DETECTED. 


9266 










1 


9267 


031622 


005037 


002266 




CLR PASSNO 


9266 


031626 


104424 






CACHOFF 


9269 


031630 
031630 








REPEAT 


9290 


031630 








LET PASSNO PASSNO * #1 


031630 


005237 


002266 






9291 


031634 


005000 






CLR RO 


9292 


031636 


105037 


002264 




CLRB PASFLG 


9293 


031642 


104513 






CBRE6 


9294 


031644 
031644 








REPEAT 


9295 


031644 








LET PASFLG :B- PASFLG ♦ 


031644 


105237 


002264 






9296 


031650 
031650 


012704 


177777 




LET R4 :■ #-1 


9297 


031654 








LET NOPAR :■ #1 




031654 


012737 


000001 


002076 




9296 


0316*2 








LET BITNO : " #0 




031662 


0050S7 


002324 




IFB PASFLG EQ #1 


9299 


031666 










031666 


123727 


002264 


000001 






031674 


001003 






LET R5 #1 


9300 


031676 
031676 


012705 


000001 




9301 


031702 
031702 


000402 






ELSE 




031704 








LET R5 ^177776 


9302 


031704 










031704 


012705 


177776 




END 


9303 


031710 










031710 








REPEAT 


9304 


031710 










031710 








LET PARCNT «0 


9305 


031710 










031710 


005037 


002072 






9306 


0S1714 


Ow32S7 


002924 




9507 


031720 
031720 


005204 






LET R4 :- R4 « #1 


9306 


031722 








LET R2 :B- PTABLE(R4) 




031722 


116402 


040164 




ASH *5.R2 


9309 


031726 


072227 


000005 




9310 


031732 


052702 


000006 




BIS «6IT2!BIT1.R2 


9511 


031736 








LET CSR R2 




031736 


010237 


002150 




LOADCSR 


9312 


031742 


104425 






9313 


031744 
031744 


010011 






LET (Rl) :- RO 


9314 


031746 








IF PASSNO EQ 61 



•1 



A DATA WORD THAT A S6E 



I CLEAR OUTER LOOP COUNTER 

J TURN OFF CACHE 

i 

B53 : 1 1 1 1 1 i 

INC PASSNO 

I CLEAR DATA 
, CLEAR PASFLG 

> ENABLE CHECK/SYNDROnE BIT REGISTER 

; 

B54 : 1 1 1 1 1 i 
I INCREMENT LOOP COUNTER 

INCB PASFLG 
: INDEX TO SINGLE BIT ERROR TABLE 

NOV •-1.R4 

(ENABLE PARITY ACTION 

NOV •l.NOPAR 

(CLEAR INNER LOOP COUNTER 

CLR BITNO 

(SELECT DATA TO BE CORRECTED BY PASSNO 

CHPB PASFLG. 61 
BNE L303 

:DATA-0(BIT TO BE CORRECTED IS A ONE 

HOV 61. RS 

' BR L304 

L303 :({(((( 
{DATA-177776{BIT TO BE CORRECTED IS A ZERO 

nOV #177776, R5 

{ 

L304 : ( ( ( II I 

I 

B55 : 1 1 ( I ( I 
(CLEAR PARITY COUNTER 

CLR PARCNT 

(INCREMENT BIT POINTER 
(POINT TO NEXT SET OF CHECK BITS 

INC R4 

(GET NEXT SET OF CHECK BITS 

HOVB PTABLE(R4).R2 

(SHIFT TO LINE UP IN CSR 

(ENABLE OIAG NODE 

(GET CHECK BITS TO BE MRITTEN 

NOV R2.CSR 

I LOAD CSR UITH DATA 

(WRITE DATA TO TEST ADDRESS 

HOV RO.(Rl) 

I WRITE CSR 



I 



J 



CVnjABO HSVXl 
MTP046 



J MEWY dim; 

CHECK SINGLE BIT 
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931S 
9S16 



9919 
9S22 



9S2S 

9S24 

9S2S 
95M 

9S27 
9S2B 
9329 



95S0 
9331 



9332 
9333 
93S4 

9335 



9336 
9337 



93SB 



9939 
9340 
9341 
9942 
9943 
9344 



994S 



09174« 
0S17S4 
031796 
031760 
031760 
031762 
031762 
031764 
031764 
0S1764 
091766 
031772 
031774 
031774 
092002 
0S2004 

oiioo4 

0S2012 
0S2012 
092020 
092022 
032022 
032022 
032024 
092026 
03202* 
0S2094 
0S2096 
092040 
0S2040 
092042 
092042 
092044 
092046 
092046 
092046 
092046 
092054 
092056 
092056 
092060 
092060 
092066 
092070 
092070 
0920^0 
092076 
092100 
092100 
092102 
032104 



032106 
092106 
092114 
092116 



023727 002266 000001 

001002 

104471 

000401 

104507 



005711 

004797 092106 
104426 

092797 100000 002150 
001007 

013737 002150 002052 

012737 177777 002612 
104045 



104503 
005011 

123727 002264 000001 

001002 

006305 

000402 

000261 
006105 



023727 002324 000020 
001315 

005100 

123727 002264 000002 
001266 



023727 0022M 000002 
0012S4 

104503 
104423 

000207 



023727 002266 000001 
001011 



ECCIDIS 
ELSE 



ENAISBE 

END 

TST (Rl) 
CALL CHKTRP 
REAOCSR 

IF ♦BIT15 OFF. IN CSR 



LET BAD :- CSR 
SET HEADER 
ERROR *45 

END 

CLRICSR 
CLR (Rl> 

IFB PASFLG EQ 41 



ASL RS 

ELSE 



SEC 

ROL RS 

END 

UNTIL BITNG EQ «16. 



con RO 
UNTILB PASFLG EQ 42 



UNTIL PASSNO EQ *2 



CLRICSR 

CACHON 

RETURN 



CHKTRP: IF PASSNO EQ 41 

IF PARCNT EQ 41 



CHP PASSNO. 41 
BNE LSOS 

tFIRST PASS lECC DISABLE. NO "BL 

' BR L306 

LSOS: 1 1 III > 
(SECOND PASS lECC DISABLE. PBL ENABLED 

L306: 1 i 1 1 1 1 

t CORRECT SBE 

(CHECK FOR CORRECT TRAP 

(READ THE CSR FOR UNCORRECTABLE ERROR 

lis UNCORRECTABLE ERROR BIT SET7777 

BIT 46IT1S.CSR 
BNE L307 

' NOV CSR. BAD 

' NOV 4-1. HEADER 

i 

L507: ( 1 1 1 1 i 

I CLEAR LUT 

(SHIFT NEW DATA DEPENDING ON PASFLG 

CnPB PASFLG. 41 
BNE L310 

(SHIFT BITNG TO THE LEFT 

' BR L311 

L310: (((((( 

(SET CARRY BIT AND 

(ROTATE LEFT 

L311: I i( ( (I 
(UNTIL ALL BITS ARE DONE 

CflP BITN0.416. 
BNE B55 
ESS : ( 1 1 1 1 1 
(CONPLEMENT DATA AND REPEAT 
(UNTIL 2 PASSES ARE COMPLETE! 

CNPS PASrLG.42 
BNE BS4 
E54 : III I II 

' CUP PASSNO. 42 

BNE B53 

ESS : 1 1 1 1 1 1 

!tuRN CACHE 
I 



(PAS^ 1 CHECK FOR NO TRAP 

or PASSNO. 41 

L31S 



( 



CVnjABO 
MTP046 



9346 



9347 
9348 

9349 



9350 

9551 

9352 
9353 

9354 

9555 



032116 
032124 
032126 
032126 
032134 
032136 
03214^ 
032136 
032136 
032140 
032140 
032140 
032146 
032150 
032150 
032156 
032160 
032160 
032160 
032160 
032160 



023727 
001004 

012737 
104057 



000410 



023727 
001404 

012737 
104064 



000207 
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MSVll-J MEHORY DIAG. ^ _ 

CHECK SINGLE BIT ERRORS UltH ECC DISABLED 



177777 002612 



002072 
177777 



000001 



002612 



END 
ELSE 



SET HEADER 
ERROR *57 



IF PARCNT NE •! 



END 

END 

RETURN 



SET HEADER 
ERROR *64 



CUP PARCNT. •! 
BNE L316 

MOV ♦1. HEADER 

LS16: i : I 1 1 1 

BR L317 
LS15: i > 1 I i I 

CHP PARCNT. •! 

BEI L320 

MOV HEADER 



L320: 1 1 1 i 1 1 
L317: 1 1 1 1 1 1 



CVMJ*80 HSV13-J MEMORY 01 AC. 
MTP040 CHtL; SINGLE BIT ERRORS 

9557 0S2162 



955t 
9S59 
9M0 
9M1 
9M2 
9363 
9364 
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^.cQ 0248 



9365 
9366 
9367 
936S 
9369 

9370 
9371 

9372 

9373 
9374 

9375 
9376 
9377 
9376 
9379 



9360 

9361 

9362 

9363 
9364 

9385 
9366 
9387 



0d^l63 
032164 
03216V 
032170 
032174 
032200 
032204 
032206 
032206 
032214 
032216 
032216 
032220 
032220 
032226 
032230 
032230 
032232 
032234 
032236 
032240 
032246 
032246 
032252 
032254 
032254 
032262 
032262 
032266 
032266 
032274 
032276 
032276 
032276 
032302 
032304 



104424 

013704 
'^7242-' 
04«f04 
052704 
104513 

012737 
104425 

005011 

012737 
104425 

005012 
104503 
005711 
104426 
042737 

023704 
001411 

013737 

010437 

012737 
104063 



052704 
005712 
104426 



020000 
002150 

002150 
002044 

177777 

000020 



MTP047: SUBTST <<MTP047 



NO CSR UPDATE ON SBE UITH EXSISTING 08E>> 



{•SUBTEST 



MTP047 NO CSR UPDATE ON SBE UITH EXSISTING DBE 



i THIS TEST CHECKS TO SEE THAT THE CSR CONTENTS UILL NOT CHANGE 
I UITH A SINGLE BIT ERROR UHEN A DOUBLE BIT ERROR ALREADY 



002102 
000011 
170037 
100000 



003144 002150 



000104 002150 



002150 

002052 
002612 



EXISTS. 



CACHOFF 
LET R4 : 



BANK 



ASH «9. .R4 
BIC #tC7740.R4 
BIS 4BIT15.R4 
CBREG 

LET CSR :- 43144 



LOADCSR 
LET CRD : 

LET CSR 

LOADCSR 
LET fR2) : 



• 40 
•104 

• 40 



CLRICSR 
TST (Rl) 
REAOCSR 

BIC 4BIT13.CSR 
If CSR NE R4 



LET BAD :• CSR 
LET GOOD :« R4 
SET HEADER 



ERROR *63 

END 

BIS 420. R4 

TST CR2) 
REAOCSR 



I TURN OFF CACHE 
iGET BANK NUMBER 

MOV BANK.R4 

, SHIFT INTO PLACE 
:MASK OUT UNUANTEO BITS 
iSET UP GOOD DATA 

{ENABLE CHECK/SYNOROME BIT REGISTER 
t CHECK BITS FOR O^^JBLE BIT ERROR 

nOV 43144. CSR 



iURITE OGE CHECK BITS 
:URITE SBE CHECK BITS 



CLR (Rl) 
MOV 4104. CSR 
4K 



sURITE SBE CHECK BITS AT ADDRESS * 

CLR CR2) 

i CLEAR CSR 

:REAO QBE LOCATION 

:REAO FOR CSR QBE INDICATOR 

: CLEAR tr^HIBIT MODE POINTER 

CMP CSR.R4 
BEQ L321 



MOV CSR. BAD 
MOV R4.G000 
MOV •-l.HEADCR 

i 

LS21: : : i : : : 
:SET BIT IN GOOD DATA 
tREAO SBE 

I READ CSR FOR NO CHANGE 
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SEQ 0249 



9368 


032306 


042737 


02OOOO 


002 ISO 


BIC #BIT1S.CSN 


1*1 CAB TUUTBTT 

: CLEAR INHIBIT 


nOOc rOlNTtH 


9389 


092314 
032314 
032320 


023704 
001411 


002150 




IF CSR NE R4 


i 


OCA 


9390 


032 322 








LcT BAD :■ CSk 


1 






032322 


013757 


002150 


002052 






nuv 


9391 


032330 








LET GOOD : ■ H4 


> 




9392 


032354 








SET HEADER 


i 






052554 


012757 


177777 


002612 






MOV 


9S95 


052542 


104051 






ERROR *S1 






9394 


052544 
052544 








END 


I 


L522: : : 1 1 . i 


9395 


052544 


104505 






CLRICSR 


(CLEAR 1 CSR 




9396 


052546 


005011 






CLR CRD 


I 




9397 


052550 


005012 






CLR (R2) 


Iturn on cache 




9398 


052552 


104425 






CACHON 




9399 


052554 


000207 






RETURN 







CVMJABO riSVll-J MEMORY OIAG. 
niSC SUBROUTINES 

9401 
9402 

940S 032356 



9404 052356 

9405 032360 

9406 032362 

9407 032364 
940a 

9409 032366 



010004 
010103 
010205 
000207 























Vw3C J f 


WcOXw 








177774 


9413 


052402 


022737 


000001 


9414 


032410 


001414 




9415 


032412 


022737 


000002 


9416 


032420 


001413 




9417 


032422 


022737 


000003 


94ia 


032430 


001414 




9419 


032432 


005000 




9420 


032434 


013704 


002614 


9421 


032440 


000414 




9422 


032442 








032442 


005000 






032444 


005004 




9423 


032446 


000411 




9424 


032450 


012700 


000401 


9425 


032454 


013704 


002614 


9426 


032460 


000404 




9427 


032462 


012700 


000401 


9426 


032466 


012704 


000401 


9429 


032472 


010037 


024650 


9430 


0S2476 


010037 


024664 


9431 


032502 


010037 


024710 


9432 


032506 


010037 


024724 


9433 


032512 








032512 


012600 




9434 


032514 


000207 





MACRO Y05.02 Monday 07 Oct -85 16:57 Page 276 

.SSTTL MISC SUBROUTINES 
RE6C0PY:SU6TST <<SUBR COPY RO TO R4.R1 TO R3. £ R2 TO R5>> 



SEQ 0250 



••SUBTEST 



Sl«R 



COPY RO TO R4.R1 TO R3. £ R2 TO R5 



MOV R0.R4 
MOV R1.R3 
MOV R2.R5 
RETURN 

FLIPWARN:SUBTST <<FLIP WARNING CONSTANTS IN WORST CASE NOISE TESTS>> 



i*SUBTEST 



FLIP WARNING CONSTANTS IN WORST CASE NOISE TESTS 



002616 
002616 

002616 

002616 



2<: 
41: 



PUSH 

INC 
BIC 
CMP 
BEQ 
CMP 
BEQ 
CMP 
BEQ 
CLR 
MOV 
BR 

CLEAR 



BR 

MOV 

MOV 

BR 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

POP 

RETURN 



RO 

FLIPLOC 
♦tC3.FLIPL0C 
♦1. FLIPLOC 
It 

♦2, FLIPLOC 
2< 

♦3. FLIPLOC 

31 

RO 

0NES.R4 
4« 

R0.R4 



4« 

MOl.RO 
0NES.R4 
4« 

«401.R0 

M01.R4 

R0.WARN2 

R0,WARN3 

R0.WARN4 

RO. WARNS 

RO 



MOV RO.-(SP) 



CLR RO 
CLR R4 



MOV {SP)».RO 



CVnjABO nSVll-J riEnORY OIAG. rtACRO YOS.OZ rionday 07-0ct-8S 1€:S7 Pag« 277 
FLIP WARNING CONSTANTS IN WORST CASE NOISE TESTS 



SEQ 0251 



94 36 0S2516 



BACKGNO:SUBTST <<SUBR URITE BACKGROUNO>> 



i*SUeTEST 



SUBR 



URITE BACKGROUND 



9437 










lURITES 


9438 


032316 


104415 






SAVREG 


9439 


032520 


012700 


060000 




MOV 


9440 


032524 


012701 


040000 




MOV 


9441 


032530 


012737 


000207 


024532 


MOV 


9442 


032536 


012737 


024526 


002262 


MOV 


9443 


032544 


004737 


024334 




CALL 


9444 


032550 


012737 


000240 


024532 


MOV 


9445 


032556 


104416 






RESREG 


9446 


032560 


000207 






RETURN 


9447 













DATA FROM R2 

♦FIRST. RO 

«SIZE.R1 

♦2O7.MTPOO0*4 

«MTPO0O.SUP00ADD 

SUPD03 

«240.nTP000*4 



J WARNING PUTTING "RETURN" AFTER WRITE 
sRESTORE 'NOP' AFTER WRITE 



CVMJABO MSVll-J MEMORY OI*G. 
SUBR UAITE BACKGROUND 

9449 032562 



9450 
9451 
9452 
9453 

9454 032562 

9455 032566 

9456 032572 

9457 032574 

9458 032576 

9459 032602 

9460 032606 
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GETCSR: SUBTST <<SUBR GET GSR INFORMATION FROM CONFIGURATION TABLE >> 



SEQ 0252 



013702 002104 
016203 002664 
000303 
006303 

042703 177741 
010337 002152 
000207 



:*SUBTEST 



SUBR 



GET CSR INFORMATION FROM CONFIGURATION TABLE 



I • 



; INPUTS 

! OUTPUT 

MOV 

MOV 

SWAB 

ASL 

BIG 

MOV 

RETURN 



NONE 
GSRNO 



CSR NUMBER 



BANKIN0EX.R2 

C0NFI6(R2).R3 

R3 

R3 

«tC36.R3 
R3,CSRN0 



I GET INDEX INTO CONFIG TABLE 
J MOV IT INTO R3 



(CLEAR OFF SOME BITS 
J SAVE CSR NUMBER 



CVnjAeO nSVll-J MEnOftY OIAG. riACRO YOS.OZ nonday 07-0ct-S5 16:57 Pag* 2S0 
SUBR GET CSR INFORMATION FROn CONFIGURATION TABLE 



SEQ 0253 



9463 032610 



PCONFIG:SteTST <<SUeR PRINT CONFIGURATION MAP>> 



t*SUBTEST 



SliBR 



PRINT CONFIGURATION HAP 



9464 


032610 












000060 




032614 


013746 


000062 




032620 


010046 






032692 


0106S7 


033222 


9466 


032626 


012737 


033170 


9467 


032634 


012737 


000340 


9466 


032642 


017700 


147776 


9469 


032646 


042737 


000200 


9470 


032654 


052777 


000100 


9471 








9472 


032662 








032662 


104401 


065173 


9473 


032666 








032666 


104401 


065255 


9474 


032672 








032672 


104401 


065332 


947S 


032676 


022737 


000060 


9476 


032704 


002006 




9477 








9476 


032706 








032706 


032777 


000020 




032714 


001402 






032716 


000137 


0S31S0 




032722 






9479 


032722 


012700 


000074 


9460 


032726 


010004 




9461 


032730 








032730 


005001 






032732 


00S003 




9462 


032734 








032734 


104401 


065437 


9463 


032740 


004737 


033224 


9464 


032744 


022737 


000060 


9465 


032752 


002106 




9466 


0327S4 








032754 


104401 


002660 


9467 


032760 








032760 


104401 


066146 


9466 


032764 








0S2764 


104401 


065640 


9489 


032770 








032770 


104401 


002660 


9490 


032774 








032774 


104401 


066146 



000060 
000062 

177776 
147760 



002556 



147722 



NOOJ: 



002556 



PUSH 



TKVEC,TKVEC*2.R0 



NOV 
MOV 
MOV 
MOV 
BIC 
BIS 

TYPE 

TYPEIT 

.DSABL 

TYPE 

TYPEIT 

.OSABL 

TYPE 

TYPEIT 

.OSABL 

CMP 

BGE 

I IF FAT 
IF «SU4 



SP.PCONFS 

♦PC0NF2.TKVEC 

♦340.TKVEC»2 

8»TKB.R0 

♦BIT7.PSU 

*6IT6,8»TKS 



MOV 
MOV 
CLEAR 



TYPE 

TYPEIT 

.DSABL 

CALL 

CMP 

BGE 

TYPE 

TYPEIT 

.OSABL 

TYPE 

TYPEIT 

.OSABL 

TYPE 

TYPEIT 

.OSABL 

TYPE 

TYPEIT 

.DSABL 

TYPE 

TYPEIT 



iSAVE LAST GOOD SP 



MOV TKVEC.-(SP) 
MOV TKVEC*2.-(SP) 
MOV RO.-(SP) 



I KILL ANY OLD INTERRUPT 
iLOUER CPU PRIORITY TO 140 
: ENABLE KEYBOARD INTERRUPTS 



MSGOOl 

.MSGOOl 

CRF 

MSG002 

,MSG002 

CRF 

MSG003 
,MS6003 

CRF 

«60.LASTBANK 
NOOJ 

PAPER ON TERMINAL GOTO 1» 
SET. IN 8SWR THEN JUMPTO PCONFl 



«60. .RO 

R0.R4 

R1.R3 



MSG004 

.MSG004 

CRF 

TC0NFI6 

«60.LASTBANK 

PC0NF2 

♦ CRLF 
.♦CRLF 
CRF 

MSG017 

.MSG017 

CRF 

MSGllA 

.MSGllA 

CRF 

♦ CRLF 

. »CRLF 
CRF 

MSG017 
.MSG017 



L323: 



BIT »SW4.aSWR 
BEQ L323 
JMP PCONFl 



CLR 
CLR 



Rl 
R3 



5 GO TYPE CONFIGURATION (1ST HALF) 



s PRINT SPACECS) 



{PRINT SPACE(S> 



cvnjABO nsvii-j HEnoRY diag. macro YOS.02 

SUBR PRINT CONFIGURATION HAP 



rionday 07 -Oct -85 16:57 Pag* 2B0-I 



SEQ 0254 













.DSA8L 


CRr 


9491 


033000 








TYPE 


MSGOll 




033000 


104401 


065726 




TYPEIT 


.MSGOll 










.DSABL 


CRP 


9492 


033004 








TYPE 


<CRLF 




033004 


104401 


002660 




TYPEIT 


. »CRLF 












. DSABL 


CRF 


949S 


OSSOlO 








TYPE 


MSG017 




033010 


104401 


066146 




TYPEIT 


.MSG017 












. DSABL 


CRF" 


9494 


033014 








TYPE 


MSG012 




033014 


104401 


066014 




TYPEIT 


.MSG012 












.DSABL 


CRF 


9495 


033020 


012701 


000360 




MOV 


*60.*2*2.R1 


9496 


033024 


010103 






MOV 


R1.R3 


9497 


033026 


004737 


033224 




CALL 


TCONFIG 


9498 


033032 


022737 


000170 002S56 


NOGJl : 


CMP 


•170.LASTBANK 


9499 


033040 


002053 






BGE 


PC0NF2 


9500 


033042 








TYPE 


♦CRLF 




033042 


104401 


002660 




TYPEIT 


.ICRLF 












. DSABL 


CRF 


9501 


033046 








TYPE 


MSG017 




033046 


104401 


066146 




TYPEIT 


.MSG017 












.DSABL 


CRF 


9502 


033052 








TYPE 


MSGllB 




033052 


104401 


066111 




TYPEIT 


.MSGllB 










.DSABL 


CRF 


9503 


033056 








TYPE 


♦ CRLF 




033056 


104401 


002660 




TYPEIT 


. KRLF 












.OSABL 


CRF 


9504 


033062 








TYPE 


MSG017 




033062 


104401 


066146 




TYPEIT 


.MSG017 












.DSABL 


CRF 


9505 


033066 








TYPE 


MSGllC 


033066 


104401 


066113 




TYPEIT 


.MSGllC 












. OSABL 


CRF 


9506 


033072 








TYPE 


♦ CRLF 


0SS072 


104401 


002660 




TYPEIT 


. ♦CRLF 










. DSABL 


CRF 


9507 


0SS076 








TYPE 


MSG017 


033076 


104401 


066146 




TYPEIT 


.MSG017 












. DSABL 


CRF 


9506 


033102 








TYPE 


MSGllD 


0SS102 


104401 


066115 




TYPEIT 


.MSGllD 










.OSABL 


CRF 


9509 


0SS106 


012701 


000740 




MOV 


#740. Rl 


9510 


033112 


OlOlOS 






MOV 


Rl.RS 


9511 


033114 


012700 


000010 




MOV 


«8. .RO 


9512 


033120 


010004 






MOV 


R0,R4 


9513 


033122 


004737 


033224 




CALL 


TCONFIG 


9514 


035126 


000420 






BR 


PC0NF2 


9515 














9516 


033130 


012700 


000170 


PCONFl: 


MOV 


«120. .RO 


9517 


033134 


010004 






MOV 


R0.R4 


9518 


033136 








CLEAR 


R1.R3 




0SS1S6 


005001 












OS3140 


005003 











t PRINT SPACE(S) 



: PRINT SPACE(S) 



: PRINT SPACE(S) 



: PRINT SPACE(S) 



CLR Rl 
CLR R3 



CVMJABO MSVll-J MEMORY 01 AG. MACRO Y05.02 
SUBR PRINT CONFIGURATION MAP 



Monday 07.0ct-65 16:57 Pag* 260-2 



SEQ 0255 



9519 0S3142 
033142 

9520 033146 
033146 

9521 0SS152 
033152 

9522 033156 
0SS156 



9523 
9524 
9525 
9526 
9527 
9526 
9529 



9530 
9531 
9532 



033162 
033166 

033170 
033174 
033202 
033206 
033206 
033210 
033214 
033220 



104401 



104401 



104401 



104401 

004737 
000721 

013706 
042777 
117700 

C12600 
012637 
012637 
000207 



066130 

065726 

065437 

066014 
0SS224 



C3S222 
000100 
147436 



000062 
000060 



033222 000000 



TYPE 

TYPEIT 

.OSABL 

TYPE 

TYPEIT 

.DSABL 

TYPE 

TYPEIT 

.DSABL 

TYPE 

TYPEIT 

.OSABL 

CALL 

BR 

PC0NF2: MOV 
147440 BIC 
MOVB 
POP 



RETURN 
PCONFS: 0 



MSG014 

.MSG014 

CRF 

MSGOll 

.MSGOll 

CRF 

MSG004 

.MSG004 

CRF 

MSG012 

.MSG012 

CRF 

TCONFIG 
NOOJl 

PCONFS. SP 
«eiT6.8»TKS 
aiTKB.RO 
R0.TKVEC»2,TKVEC 



i SPACE 



■RESTORE STACK 

:REAO CHAR TO KILL FLAG 



MOV (SP)*.RO 

MOV (SP)*.TKVEC»2 

MOV (SP)».TKVEC 



: STACK SAVED HERE! 



cvnjABO nsvii-j nsnoRY oxag. macro yds. 02 

SUBR PRINT CONFIGURATION HAP 



Henday 07-0ct-8S 16:57 Pag« 282 



SEQ 0256 



95S5 0SS224 


SUBTST 


<<SUBR 


TYPE 


CONFIGURATION) > 




i*SUBTEST 


SUBR 


TYPE 


CONFIGURATION 


9556 










9537 


iCALL: nOV 


•N.RO 




iN-NUnSER OF CHARACTERS 


9538 


t nov 


R0.R4 




(BACKUP 


9SS9 


1 nov 


•K.Rl 




t INDEX CONSTANT 


9540 


1 nov 


R1,R3 




1 BACKUP 


9541 


i CALL 


TCONFIG 




(ACTUAL CALL 


9542 


1 RETURN 






tONLY RETURN 


9543 











9544 
9545 
9546 
9547 



t** ERROR ** 



9548 


033224 


012737 


000340 


177776 


TCONFIG 


:f10V 


•340. PSU 


(DISABLE INTERUPTS 


9549 


033232 










TYPE 


nSG005 






033232 


104401 


065545 






TYPEIT 
.OSABL 


.nSGOOS 
CRF 




9550 


033236 


032761 


000001 


002664 


1(: 


BIT 


•BITO.CONFIGCRl) 


(ERROR ON THIS BANK? 


9551 


033244 


001403 








BEQ 


2% 


(NO - SKIP 


9552 


033246 










TYPE 


nSG013 


(PRINT "X" 




033246 


104401 


066126 






TYPEIT 
.OSABL 


.nSG013 
CRF 


9553 


033252 


000402 








BR 


3t 




9554 


033254 








21: 




nsG0i4 


s PRINT SPACE 




033254 


104401 


066130 






TYPEIT 
.OSABL 


.nSG014 
CRF 




9555 


033260 


062701 


000004 




31: 


ADO 


•4.R1 


sBUrP POINTER 


9556 


033264 


077014 








SOB 


R0.lt 


iLOOP UNTIL DONE 


9557 


033266 


010400 








nov 


R4.R0 




9558 


033270 


010301 








nov 


RS.Rl 





CvnjABO nsvii-J nEnoRY diag. 

SUBR TYPE CONFIGURATION 



9561 
9962 
9563 
9564 

9565 039272 

9566 OSSSOO 

9567 033306 
033306 



MACRO Y05.02 rionday 07 -Oct -85 16:57 Pag* 2S4 



SEQ 0257 



9560 033312 
033312 
033316 
033320 
033322 

9569 033322 

9570 033324 
9571 

9572 
9573 
9574 
9575 



012737 
112737 

104401 



005737 
001401 
000207 

010400 
010301 



000340 
000040 

066132 

002372 



177776 
066132 



TCPIGl: 



U* INTERLEAVE ** 
I **************** 

(THIS IS AN ENTRY POINT rROH ERROR REPORTS 



MOV 
MOVB 
TYPE 
TYPEIT 
.OSABL 



#340. PSU 
•' .MSGOIS 
MSGOIS 
.MSGOIS 
CRF 



, DISABLE INTERUPTS 

I MOVE A BLANK IN TO BE PRINTED 



IF NOT AS NE M THEN I RE TURN 



MOV 
MOV 



R4.R0 
R3.R1 



9576 


033326 








033326 


104401 


065614 


9577 


033332 


033761 


002106 


9578 


033340 


001432 




9579 


033342 


016105 


002666 


9560 


099946 


VAC 

000909 




9581 


093350 


042705 


177770 


9582 


0S3SS4 


020527 


000003 


9583 


033360 


003022 




9584 


033362 








033362 


032705 


000001 




033S66 


001413 




9585 


033370 








0J3370 


032705 


000002 




033374 


001404 




9586 


033376 


112737 


000120 


9587 


033404 








033404 


000403 






033406 






9588 


033406 


112737 


000105 


9589 


033414 








0SS414 






9590 


033414 








033414 


000403 






033416 






9591 


033416 


112737 


000120 


9592 


033424 








033424 






9593 


033424 


000403 




9594 


033426 


112737 


000040 


9595 


033434 








033434 


104401 


066132 


9596 


039440 








033440 


005737 


002372 



002664 



.ENABL 
TYPE 
TYPEIT 
.DSABL 
TCFIG2: BIT 
BEQ 
MOV 
SUAB 
BIG 
CMP 
BGT 



I** MEMORY TYPE *• 





LSB 

MSG009 
.MSG009 
CRF 

CPUBIT.CONFIG(Rl) 
17» 

C0NFIG*2CR1}.R5 
R5 

#tC7.R5 
R5.*3 

171 

IF MITO SET. IN R5 



066132 



066132 



066132 



066132 17»: 
8»: 



IF MITl SET. IN R5 

•'P. MSGOIS 



MOVB 

ELSE 



MOVB 
END 



ELSE 



MOVB 
END 



#'E. MSGOIS 



♦•P. MSGOIS 



BR 8* 

MOVB .MSGOIS 
TYPE MSGOIS 
TYPEIT .MSGOIS 
.OSABL CRF 

IF NOTAB NE M THEN IRETURN 



TST NOTAB 
BEQ L324 
RTS PC 
L924 : 1 1 1 1 1 1 



sGET MEMORY TYPE 
; CLEAR NON INTERESTING BITS 
t IS IT A LEGAL MEMORY TYPE 
tIF IF SO BRANCH!!!!!!! 
tIS IT AN ECC MEMORY??? 7 

BIT MITO.RS 
BEQ L925 

:IS IT A MSVll-P OR A MSV11-J77? 

BIT «BIT1.RS 
BEQ L326 

IT IS A MSVll-P 



BR L327 
LS26: i > s i t i 



IT IS A MSVll-J 

L327: 1 i 1 1 1 1 

BR L330 
LS2S: i 1 1 1 1 i 
; IT IS A MSVll-L/P 
I 

L3S0: !{<<:: 



TST NOTAB 



CvnjAao nsvii-J rcnoRY oiag. 
SUBR TYPE CONFIGURATION 



riACRO Y0S.02 nenday 07 -Oct -05 16:57 P»g« 2S4 



055444 
035446 
0S54SO 
9597 0SS450 
9596 0S545< 

9599 055456 

9600 0SS460 
9601 

9602 
9603 
9604 
9605 



001401 
000207 

062701 000004 
077052 
010400 
010301 



My 

<10V 
HOV 
.OSABL 



•4.R1 

R0.TCFIG2 
R4.R0 
RS.Rl 
LSB 



t ••••••••• 

j*» CSR 
I •*****•*• 



9606 


035462 








033462 


104401 


Af < 9 V A 

066154 


9607 


03S466 


112737 


AAAAAA 
UUU040 


9606 


05' '74 


OlolOs 


AA'3A^^ 

QU2064 


9609 
















9611 


035506 


042 705 


170377 


9612 


055512 


000305 




9613 


055514 


022705 


000011 


9614 


055520 


100002 




9615 


055522 


062705 


000007 


9616 


055526 


062705 


000060 


9617 


055552 


110537 


066132 


961S 


033536 








033536 


104401 


066132 


9619 


055542 








055542 


005757 


002572 




055546 


001401 






055550 


000207 






055552 






9620 


055552 


062701 


000004 


9621 


055556 


077055 




9622 


033560 


010400 




9623 


033562 


010301 




9624 









066132 TCFZG3: 



101: 
16«i 



TYPE 
TYPEIT 
.OSABL 

novB 

HOV 

BIT 

BEQ 

BIC 

SUAB 

CMP 

BPL 

ADD 

ADO 

novB 

TYPE 

TYPEIT 

.OSABL 



nSG016 
.nSG016 
CRF 

«• .nsGOis 

CONFIGCRD.RS 

♦6IT1.R5 

16* 

#tC7400.R5 
R5 

•9. .R5 
10* 
•7.R5 
«60.R5 

RS.nSGOlS 
HSG015 
.HSGOlS 
CRF 



IF NOTAB NE #0 THEN *RETURN 



ADD 
SOB 
MOV 
MOV 



•4.R1 

R0.TCFIG3 

R4.R0 

RS.Rl 



SEQ 025S 



BEQ L331 
RTS PC 
L551: I i I i I t 

I BUMP POINTER 
iLOOP UNTIL DONE 



(MAKE ASCII 
sPLUG INTO MEMORY 



TST NOTAB 
BEQ L532 
RTS PC 
L332: t i : > : i 

(BUMP POINTER 



CVnjAeO MSVll J MEMORY OIAG MACRO Y05.02 
SUBR TYPE CO»rZCURATZON 



9625 
9626 
9627 

9628 0SSS64 
05SS64 

9629 053S70 
96)0 0SSS74 
9691 055576 
9632 095604 

C49604 

9699 099610 

9694 099612 
099612 

9695 099616 

9696 099622 

9697 099624 
9696 099626 
9699 099690 



104401 065626 

105761 002664 
100006 

112797 000120 066152 

104401 066152 
000402 

104401 066150 

062701 000004 

C77016 

010400 

010501 

000207 



lit: 
151: 

141: 

151 i 
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SEQ 0259 



I** PROTECTED 


typf 

1 I r t 






MSGOlO 


OC4BL 


Crfr 






BPL 


141 


MOVB 


#'P.MSG01S 


TYPE 


MSG015 


TYPEIT 


.MSG015 


.OSABL 


CRF 


BR 


151 


TYPE 


MSG014 


TYPEIT 


.MSG014 


.DSA8L 


CRF 


AOO 


•4.R1 


see 


RO.IK 


MOV 


R4.R0 


MOV 


R5.R1 


RETURN 





I BANK PROTECTED? 
I NO - SKIP 



I PRINT SPACE 



tBUMP POINTER 
sLOOP UNTIL DONE 



CVttjABO MSVU J MCMORY OI*C. 
TRAP PARITY EftR«)R HANDLER 



<»642 
9643 
9644 
9645 
9646 
9647 
9648 
9649 
9650 
9651 
9652 
9653 
9654 
9655 
9656 
9657 
9650 
9659 
9660 
9661 

9662 
9663 
9664 
9665 
9666 
9667 
9666 
9669 
9670 
9671 
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.SBTTL TRAP PARITY ERROR HANDLER 



SCQ 0260 



033632 
033640 
033642 
033646 
033650 
033656 
033660 
033660 
033666 
033672 
033676 
033704 
033706 
033714 
033716 
033722 
033724 
033730 
033730 
033734 



022737 
001003 
005237 
000002 
022737 
001013 

012737 
004737 
063716 
042766 
000002 
022737 
001003 
013716 
000002 
004737 

005237 
104032 



000001 
002072 
000002 

177777 
034040 
002326 
000004 

000003 

002304 

034040 

002064 



002076 

002076 

002144 

000002 
002076 



VECTOR TO HERE FROM TRAPS TO 114 

IGNORE ERRORS BUT COUNT IF NOPAR FLAC - 1. 



CODE 

6' 
1 
2 
3 

PARITY: CMP 
BNE 
INC 
RTI 

l»: CMP 
BNE 

SET 

CALL 
ADO 
BIC 
RTI 

2»: CMP 
BNE 
MOV 

RTI 

SI: CALL 
FATAL 
INC 
ERROR 
.OSABL 



ACTION 

WInT'UNEXPECTEO PARITY TRAP 
COUNT ERROR 

SET "ABORT" / SETUP "BAOPC" / RETURN VIA PCBUMP 
RETURN VIA "PARTHERE" 



*1. NOPAR 
II 

PARCNT 

•2 . NOPAR 
21 

ABORTFLAG 

BAOSTACK 
PCBUMP. (SP) 
•BIT2.2(SP) 

«3. NOPAR 
31 

PARTHERE. (SP) 

BAOSTACK 
32 

FATALI 
♦ 32 
CRF 



{COUNTING PARITY ERRORS? 
iNO - SKIP 

iPARITY ERROR COUNTER • 1 

{ACTION CODE ■ 2 7 
iNO SKIP 
J YES 

MOV ABORTFLAG 
J FIND BAD SP.PC.PSU OFF STACK 
: UPDATE RETURN PC 
;SHOU FAILURE BY .NE. 

(ACTION CODE - 3 7 
iNO - SKIP 



jFINO BAD SP.PC.PSU OFF STACK 
sSET FATAL INDICATOR 



CvnjAso nsvxi j rcnoRr 01 AC macro yos.02 

TRAP NON EXISTANT fCnORY (HOLES) HANDLER 
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SEQ 0261 



9674 








9675 








9676 








9677 








9678 








9679 








9680 








9681 








9682 


033736 


022737 


000001 


9683 


033744 


001011 




9684 


033746 


005237 


002070 


9685 


033752 


022737 


000001 


9686 


033760 


001002 




9687 


033762 


010037 


002034 


96 S8 


033766 


000002 




9689 


033770 


005257 


002070 


9690 


033774 


012701 


000001 


9691 


034000 


000002 




9692 








9693 








9694 








9695 


034002 


004737 


034f40 


9696 


034006 








034006 


005237 


002i*64 




034012 


104006 





9697 
9698 

9699 054014 

9700 054020 
054020 
054024 

9701 

9702 054026 
9705 054052 
054052 
054056 

9704 
9710 

9711 054040 



9712 054040 
9715 054044 

9714 054052 

9715 034060 

9716 034066 



004757 

005257 
104007 



004737 

005237 
104005 



010637 
062737 
016657 
016637 
000207 



.S8TTL TRAP 



NON-EXISTANT HEnORY (HOLES) HANDLER 



> VECTOR TO HERE (SOMETIMES) FROM TRAPS TO 4 

CODE IN NONEM DETERMINES ACTION AS FOLLOWS: 

IGNORE ERRORS BUT COUNT IF NONEM (NO NON-EXISTANT MEMORY) FLAG 
TO EXIT PATTERN 0 DURING SIZING IF NON-EXIST MEM ERROR 



i 

( 1) 
s 2) 



002100 



002070 



N0NEXIST:CMP 
BNE 
INC 
CMP 
BNE 
MOV 

II: RTI 
21: INC 
MOV 
RTI 



•1. NONEM 
21 

NEMCNT 

♦l.NEMCNT 

It 

RO. ADDRESS 

NEMCNT 
•l.Rl 



(COUNTING NON-EXISTANT MEMORY ERR0RS7 
J NO - SKIP 

(BUMP NON-EXISTANT MEMORY COUNTER 
(FIRST ERROR? 
(NO - SKIP 

(ASSUME RO CONTAINS THE ADDRESS ACCESSED 

(BUMP NON-EXISTANT MEMORY COUNTER 
(DUMMY UP Rl FOR A FORCED SOB EXIT 



.S8TTL 
TIMEOUT: CALL 
FATAL 
INC 
ERROR 
.DSABL 



TRAP TIMEOUT (TRAP "0 4) HANDLER 

BAOSTACK (FIND BAD SP.PC.PSU OFF STACK 

6 

FATAL I (SET FATAL INDICATOR 

•6 

CRF 



054040 
002064 

034040 
002064 



.SBTTL 
MMTRAP: CALL 
FATAL 
INC 
ERROR 
.DSABL 
.SBTTL 
PDPllOSrCALL 
FATAL 
INC 
ERROR 
.DSABL 



TRAP MEMORY MANAGEMENT (TRAP TO 250) HANDLER 
BADSTACK (FIND BAD SP.PC.PSU OFF STACK 

7 

FATALI (SE1 rMTAL INDICATOR 

♦ 7 

CRF 

TRAP RESERVED INSTRUCTION HANDLER 

BADSTACK ,FINO BAD SP.PC.PSU OFF STACK 

5 

FATALI (SET FATAL INDICATOR 

•5 

CRF 



BADSTACK :SUBTST <<FIND BAD SP. PC. £ PSU FROM STACK >> 



>*SUBTEST 



FIND BAD SP. PC. £ PSU FROM STACK 



002026 

000002 002026 

000002 002022 

OU0004 002032 



MOV 
ADD 
MOV 
MOV 

RETURN 



SP.BADSP 
«2.BADSP 
2(SP).BADPC 
4(SP).BA0PSU 



CVttjABO MSVll J henOWY OIAG. 
TRAP KERNEL TRAP HANDLER 



9719 








9720 








9721 








9722 








9723 








9724 


034070 


042766 


140000 


9725 


034076 


000002 




9726 








9727 








9728 


0S4100 


052737 


000001 


9729 


034106 


000002 




97S0 








97S1 








9732 


0S4110 


042737 


000001 


9733 


0S4116 


000002 




9754 








9735 








9736 


034120 


005737 


002544 


9737 


034124 


001406 




97 3« 


034126 


Ci3737 


002544 


9739 


094134 


052 '37 


OOuvOl 


9740 


034142 


000002 




9741 








9742 








9743 


0S4144 


005737 


002544 


9744 


034150 


001403 




9745 








9746 


0S4152 


055757 


0025S0 


9747 


034160 


000002 
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.SBTTL TRAP KERNEL TRAP HANDLER 



177572 
177572 



177746 
177746 



177746 



SEQ 0262 



I KERNEL IS A TRAP THAT COMES HERE 



000002 (KERNEL ; 



RTI 



BIC 



♦140000. 2CSP) 



.SBTTL TRAP ENERGIZE TRAP HANDLER 
IENERCT7E:BIS tBITO.HnRO 
RTI 



.SBTTL TRAP OEENERGIZE TRAP HANDLER 
«DEENERGIZE:BIC MITO.MMRO 
RTI 



ICACHN: 



II: 



.SBTTL 

TST 

BEQ 

HOV 

BIS 

RTI 



TRAP 
CACHKN 
It 

CACHKN. CONTRL 
«6IT0.C0NTRL 



CACHON TRAP HANDLER 

:IS THERE A CACHE 
■NO RETURN 

i SETUP CACHE AS PER CONSTANT (USUALLY 1 - FULLY ON) 
i DISABLE TRAPS (BUT NOT ABORTS) 



.SBTTL TRAP CACHOFF TRAP HANDLER 
ICACHF: TST CACHKN iIS THERE A CACHE? 

BEQ II sNO RETURN 

iDISABLE TRAPS (NOT ABORTS). FORCE HISSES. FLUSH. BYPASS 
BIS CACHKF. CONTRL 

II: RTI 



CVHJ*eO HSVll J MEMOUT OIAC. 
TRAP LOAD CSR TRAP HANDLER 
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SEQ 0263 



9750 
9751 
9752 
9753 



9754 
9755 



9756 
9757 
9756 
9759 
9760 
9761 
9762 
976S 
9764 
9765 
9766 



9767 
9768 
9769 
9770 
9771 

9772 
9773 
9774 

9775 



034162 
034162 
034164 
034166 
034172 
034172 
034176 
034200 
034204 
034206 
034212 
034216 
034222 
034224 
034232 
034254 
034242 
034250 
034250 
034252 
034254 



034256 
034256 
034260 
034264 
034272 
034272 
034274 



010046 
010146 
013700 

005737 
001021 
005737 
100007 
113701 
042701 
020137 
001404 
123737 
001003 
052737 
C13760 

012601 
012600 
000002 



010046 
013700 
0160S7 

012600 
000002 



002152 
002536 



002152 
172100 



♦LOAOC: PUSH 



.SBTTL TRAP LOAD CSR TRAP HAhlOLER 
iLOAO CORRECT CSR WITH DATA IN CSR 

, PROGRAM CSRS ASSERT INHIBIT MODE POINTER UHEN LOADED 



RO.Rl 



MOV CSRNO.RO 
IF INHECC IS TRUE 



THEN GOTO 31 



I SAVE 



t CREATE CSR 
i DON'T WANT 



002532 






TST 


PGMCSR 








BPL 


It 


002533 






MOVB 


PGMCSR U-Rl 


177740 






BIC 


•tC37.Rl 


002152 






CMP 


Rl.CSRNO 








BEQ 


2< 


002532 


002152 


11: 


CMPB 


PGMCSR.CSRNO 








BNE 


3» 


020000 


002150 


21: 


BIS 


•eiT13,CSR 


002150 


172100 


3»; 


MOV 


CSR,CSRAOD(RO) 






POP 


Rl.RO 



REGISTERS 

MOV RO.-(SP) 
MOV R1,-(SP) 

ADDRESS 

INH. MODE POINTER ON 

TST INHFCC 
BNE 31 

INTERLEAVED SPACE? 



PROGRAM IN 

BRANCH IF NOT 

CHECK SECOND CSR 

CLEAR UNNECESSARY BITS 
lis THIS THE CURRENT CSR? 
iBRANCH IF IT IS 
;IS THIS THE CURRENT CSR? 
■ BRANCH IF NOT 

I SET THE INHIBIT MODE POINTER TO 1ST 16K 
sLOAD THE CSR 
{RESTORE REGISTERS 

MOV (SP)*.R1 
MOV (SP)*.R0 



RTI 



tREADC: 



.SBTTL TRAP READ CSR TRAP HANDLER 
(READ THE CORRECT CSR INTO LOCATIONS CSR 
PUSH RO 



002150 



MOV 
MOV 
POP 

RTI 



CSRNO.RO 

CSRADD(RO).CSR 

RO 



:READ IT 



MOV RO. (SP) 
MOV (SP)*.RO 



cvnjABO nsvii-j ncnORY DIAG. 
TRAP TEST (Rl) C READ CSR CAREFULLY 

9777 
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9778 


034276 








ITSTRO: 


PUSH 


R0.R2.R3 




034276 


010046 














034300 


010246 














034302 


010346 










•CSRAOO.RO 


9779 


034304 


012700 


172100 






riov 


9780 


034310 


063700 


002152 






AOO 


CSRNO . RO 


9781 


034314 


005002 








CLR 


R2 


9782 


034316 


005737 


002532 






TST 


PGMCSR 


9783 


034322 


100007 








BPL 


11 


9764 


034324 


113703 


002533 






nova 


PGMCSR a.RS 


9785 


034330 


042703 


000200 






BIC 


#6IT7.R3 


9786 


034334 


020337 


002152 






CMP 


R3. CSRNO 


9787 


034340 


001404 








BEQ 


21 


9788 


034342 


123737 


002532 


002152 


1«: 


CMPB 


PGMCSR. CSRNO 


9789 


034350 


001002 








BNE 


3« 


9790 


034552 


012702 


020000 




21: 


MOV 


«BIT13.R2 


9791 


0S4SS6 


004737 


034430 




3t: 


CALL 


TSTROl 


9792 












2 IF SINGLE BIT ERROR 


9793 


034362 








5»: 


POP 


R3.R2.ro 




034362 


012603 














034364 


012602 














034366 


012600 












9794 


034370 










IF ♦BIT4 SET. IN CSR / 




034370 


032737 


000020 


002150 










034376 


001410 


















1 AAAAA 


AA9 1 Kf\ 










034406 


001004 












9795 


034410 


052766 


000001 


000002 




BIS 


«BIT0.2(SP) 


9796 


034416 










ELSE 






034416 


000403 














034420 














9797 


034420 


042766 


000001 


000002 




BIC 


«BIT0.2(SP) 


9798 


034426 










END sOF 


IF «BIT4 




034426 










RTI 




9799 


0S4426 


000002 










9800 
9801 


034430 


010210 






TSTROl: 


MOV 


R2.CR0) 


9802 


034432 








TESTAREA 




034432 


053737 


002552 


177776 




BIS 


TESTMOOE.PSW 












.DSA8L 


CRF 


9803 


034440 


105711 








TSTB 


CRD 


9804 


034442 


042737 


140000 


177776 




BIC 


•BIT15!BIT14 


9805 


034450 


011037 


002150 






MOV 


(RO).CSR 


9806 


034454 


000207 








RETURN 





.SBTTL TRAP TEST (Rl) t READ CSR CAREFULLY 



{CREATE CSR ADDRESS 



SET CARRY BIT 



SEQ 0264 



MOV RO.-(SP) 
MOV R2.-(SP) 
MOV R3.-(SP) 



L333:: 
L334:: 



MOV (SP)». R3 
MOV (SP)*.R2 
MOV (SP)*,RO 

BIT •6IT4.CSR 

BEQ L333 

BIT MITIS.CSR 

BNE L333 



BR L334 



i 



I : s : i 



;G0 TO SYSTEM TEST MODE 



^»«P ECC DISABLE ALL CSR' 
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SEQ 0265 



9809 
9810 
9811 
9812 
9815 

ISII 

9816 
9817 
9818 
9819 
9820 
9821 
9822 
9823 
9824 
9825 
9826 
9827 
9828 
9829 
9830 
9831 
9832 
9833 
9634 
9635 
9636 
9637 
9636 
9639 
9640 
9641 
9642 



034456 
054464 
034470 

0^450^ 
034502 

034504 
034512 
034516 

03452C 
034526 
034530 

034532 
034540 
034544 

034546 
034554 
034556 

034560 
034566 
034574 
034600 

034602 
034610 
034616 
034620 



012757 
004757 
000002 

012737 
104425 
000002 

012737 
004737 
000002 

012737 
104425 
000002 

012737 
004737 
C00002 

012737 
104425 
000002 

013737 
052737 
004737 
000002 

013737 
052737 
104425 

000002 



000002 002150 
035202 



000002 002150 



000001 002150 
035202 



000001 002150 



000003 002150 
035202 



000003 002150 



002314 002150 
000006 002150 
035202 



002314 002150 
000006 002150 



.SBTTL 
»ECCOIS:MOV 

CALL 

RTI 

.SBTTL 
»ECC10IS:MQy^ ^ 

LOADCSR 

RTI 

.SBTTL 
»ECCINIT:MOV 

CALL 

RTI 

.SBTTL 
»ECC1INIT:M0V 

LOADCSR 

RTI 

.SBTTL 
tENASBE:nOV 

CALL 

RTI 

.SBTTL 
tENAlSBE:M0V 

LOADCSR 



TRAP ECC DISABLE ALL CSR'S TRAP HANDLER 

MITl.CSR 

CSROUT 

TRAP ECC DISABLE OF 1 SELECTED CSR TRAP HANDLER 
•BITl.CSR 



TRAP INITIALIZE ALL CSR'S TRAP HANDLER 

MITO.CSR 

CSROUT 



TRAP INITIALIZE 
MITO.CSR 



1 SELECTED CSR TRAP HANDLER 



TRAP ENABLE SBE PARITY TRAPS ON ALL CSR'S 

«6IT0!BIT1,CSR 

CSROUT 

TRAP ENABLE SBE PARITY TRAPS ON 1 SELECTED CSR 
«6IT0!BIT1,CSR 



TRAP WRITE CHECKBITS THRU ALL CSR'S TRAP HANDLER 
CHECK. CSR :BITS 11-5 

*BIT1!BIT2.CSR i CHECK MODE 



RTI 
.SBTTL 
ICBCSR: MOV 
BIS 

CALL CSROUT 
RTI 

.SBTTL TRAP WRITE CHECKBITS THRU 1 SELECTED CSR TRAP HANDLER 
tCBlCSR:MGV CHECK, CSR sBITS 11-5 

BIS «6IT1!BIT2,CSR : CHECK MODE 

LOADCSR 
RTI 



CVMJABO nsvii-j riEMORr OIAG. 
TRAP WAS THERE A SBE ON ANY 

9645 



9846 


034622 










0S4622 












01v##0 






9847 


034626 


OlO rOl 






9848 


034632 










034O34 










034634 








9B90 


034634 










t\WAA.^A 

U34e34 


UU3Ud r 


AA01 ^3 






034640 








9091 


nXA^Afi 
0340*U 








9032 


0340*« 










03404c 








9033 


U3404* 


1 AAA 9^ 






903^ 


u34o4D 














AAAA9A 


WC X 




U340 J4 








9133 


U34030 












n 97AA 


1 77777 

X r r r r f 




9B30 


U3400e 










034002 








903 r 












v^^oo^ 








7030 


v^^oo^ 


















9039 


V J^OO^ 










nXAfkfkA 


WW J r VX 








nxAtktLfk 

Ud^OOO 


VwX^w f 








fSXAt^Tn 










n^AfkTn 


wOC ( w ' 


VwwwwC 


WC X 




fWAtilfk 

SJO^V f o 


00X737 


AA^ 1 


WW 






AAX7^S 
















90D1 


f wo 










rUO 










AVA7MI 
r I/O 


VVOww^ 








nx47in 










nxA7m 

r XV 


ni 9 AAA 








OXA71 9 

V f xc 


01 PAAI 
wXCvwX 






9864 


034714 










054714 


103004 






9865 


034716 


052766 


000001 


000002 


9866 


034724 










034724 


000403 








034726 








9867 


034726 


042766 


000001 


000002 


9868 


034734 










034734 








9869 


034734 


000002 
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CSR TRAP HANDLER 

.SBTTL TRAP WAS THERE A SBE ON ANY CSR TRAP HANDLER 
IUASSeE:PUSH R1.R4 



SEQ 0266 



MOV TOTCSRS.Rl 
CLR R4 
BEGIN LUSBE 



J GET CSR'S BYTE 



FOR CSRNO :- «0 TO «36 BY *2 

ASL Rl 
ON. ERROR 

REAOCSR 

IF «6IT4 SET. IN CSR 

SET R4 

LEAVE LUSBE 
END iOF IF #eiT4 
END :0F ON. ERROR 
IF Rl EQ «0 THEN LEAVE LUSBE 

END tOF FOR CSRNO 



END LUSBE 



ROR 
POP 



R4 

R4.R1 



tSET C BIT FOR ERROR 



ON. ERROR 

BIS «8IT0.2(SP) 

ELSE 



8IC ♦BIT0.2CSP) 
END lOF ON. ERROR 

RTI 



MOV Rl.-(SP) 
MOV R4. (SP) 



B56 ; t 1 : : > : 

CLR CSRNO 
B57: s t i i I : 



BCC L33S 

BIT «6IT4.CSR 

BEQ L336 

MOV «-l.R4 

BR E56 

L336: t > s s ; i 

L335: ;:::>! 

TST Rl 
BEQ ES6 

ADD *2. CSRNO 
CMP CSRNO. •36 
BLE B57 
ES7 : : i : I : ; ; 

ES6 : i s : : 1 1 



MOV (SP)*.R4 
MOV (SP)*.R1 

BCC L337 



BR L340 

L337: i : i t i > 



LS40: 1 1 1 s > > 



CVMJABO MSVll-J MEMORY OIAG. MACRO YDS. 02 Monday 07-0ct-85 16:57 Pag* 297-1 
TRAP MAS THERE A SBE IN 1 SELECTED CSR TRAP HANDLER 



SEQ 0267 



9870 
9871 

9872 034736 

9873 034 740 

9874 034746 

9875 034754 

9876 034756 

9877 034764 



104426 
042766 
032737 
001403 
052766 
000002 



.SBTTL TRAP MAS THERE A SBE IN 1 SELECTED CSR TRAP HANDLER 
I ON RETURN IF CARRY IS SET THERE UAS A SBE 



000001 
000020 



000002 
002150 



000001 000002 



|yASlSBE:REAOCSR 

BIC ♦6IT0.2(SP) 

BIT «BIT4,CSR 

BEO II 

BIS «6IT0.2(SP) 
II: RTI 



:CLR C BIT ON STACK 



5 SET C BIT ON STACK 



CvrijABo MiVii-J fiEnony oi*G. 

TRAP UAS THERE A OSE ON ANY 
9660 
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CSR TRAP HANDLER 



SEQ 0266 



9661 


054766 










034766 


010146 








034770 


010446 






9662 


034772 


013701 


002224 




9663 


034 776 


005004 






9664 


035000 










035000 








9665 


035000 










035000 


005037 


002152 






035004 








9666 


035004 


006301 






9667 


035006 










035006 


103010 






9866 


035010 


104426 






9669 


035012 










035012 


032737 


100000 


002150 




035020 


001403 






9690 


035022 










035022 


C12704 


177777 




9691 


0350?6 










035026 


000411 






9892 


035030 










035030 








9893 


035030 










035030 








9694 


035030 










035030 


005701 








035032 


001407 






9695 


035034 










035034 


062737 


000002 


002152 




035042 


023727 


002152 


000036 




035050 


003755 








035052 








9696 


035052 










035052 








9897 


035052 


006004 






9898 


035054 










035054 


012604 








035056 


012601 






9899 


035060 










035060 


103004 






9900 


035062 


052766 


000001 


000002 


9901 


035070 










035070 


000403 








035072 








9902 


035072 


042766 


000001 


000002 


9903 


035100 










035100 








9904 


035100 


000002 







•SBTTL TRAP 
•UASDSEtPUSH R1.R4 



WAS THERE A OBE ON ANY CSR TRAP HANDLER 



flOV TOTCSRS.Rl 
CLR R4 
BEGIN LUDBE 



J GET CSR'S BYTE 



FOR CSRNO :- «0 TO «36 BY «2 

ASL Rl 
ON. ERROR 

READCSR 

IF «BIT15 SET. IN CSR 

SET R4 
LEAVE LUDBE 
END I OF IF «6IT4 
END sOF ON. ERROR 
IF Rl EQ M THEN LEAVE LUDBE 

END :0F FOR CSRNO 



END LUDBE 



ROR 
POP 



R4 

R4.R1 



:SET C BIT FOR ERROR 



ON. ERROR 

BIS 
ELSE 



♦BIT0.2(SP) 



BIC «6IT0.2(SP) 
END iOF ON. ERROR 

RTI 



MOV Rl.-(SP) 
MOV R4.-(SP) 



B60 : i 1 1 1 1 1 

CLR CSRNO 
B61 : > 1 1 i i > 



BCC L341 

BIT MITIS.CSR 
BEQ L342 

nOV •-1.R4 

BR E60 

L342: 1 1 > i i i 

L341: : ; : { i : 

TST Rl 
BEQ E60 

ADO «2. CSRNO 
CMP CSRNO. «36 
BLE B61 
E61: s s t ; t s i 

E60 : i ; : s ( I 



MOV (SP)*.R4 
MOV (SP)*,R1 

BCC L34S 



BR L344 
LS43: 1 1 1 1 1 1 



LS44 : 1 1 1 1 1 i 



CvnjASO nSVll-J rcnonr OIAG. riACRO Y0S.02 Monday 07 Oct-65 16:57 P»9« 299-1 
TRAP WAS THERE A OBE ON 1 SELECTED CSR TRAP HANDLER 



SEQ 0269 



9905 

9907 035102 104426 

9908 0S5104 005757 002150 

9909 055110 100004 

9910 035112 052766 000001 000002 

9911 035120 000002 

9912 035122 042766 000001 000002 

9913 035130 000002 



.SBTTL TRAP UAS THERE A DBE ON 1 SELECTED CSR TRAP HANDLER 
I ON RETURN IF CARRY IS SET THERE UAS A OBE 
«UAS10BE:READCSR 

TST CSR iOBE? 

BPL 3( iNO - SKIP 

BIS •BIT0.2(SP) tSET C BIT ON STACK 

RTI 

3«: BIC «6IT0.2(SP) :CLR C BIT ON STACK 

RTI 



CvnjABO 
TRAP 

9916 
9917 

991S 
9919 
9920 
9921 

9922 
9923 
9924 
992S 
9926 
9927 
9926 
9929 
9930 
9931 
9932 
9933 



MSVll J MEMOS Y OIAG. MACRO Y05.02 
CLEAR ALL ECC CSR'S TRAP HANDLER 



035132 
035132 
035136 
035142 

035144 
035144 

035150 
035152 



0SS1S4 
035162 
035166 



035170 
035176 
035200 



005057 
004737 
000002 



005037 
104425 
000002 



052737 
004737 
000002 



052737 
104425 
C00002 



002150 
035202 



002150 



000006 
035202 



002150 



000006 002150 



Monday 07-0ct-85 16:57 Pa9a 301 

CLEAR ALL ECC CSR'S TRAP HANDLER 



SCO 0270 



.SBTTL TRAP 

ICLRCSR: CLEAR CSR 

CALL CSROUT 
RTI 

.SBTTL TRAP 

tCLRlCSR: CLEAR CSR 



LOAOCSR 
RTI 
, SBTTL 



CLEAR 1 SELECTED CSR TRAP HANDLER 



CLR CCR 



CLR CSR 



ECC DISABLE. CHECK MODE. 6 WRITE CHECKBUS IN ALL CSR'S TRAP HANDLER' 
CSR" 

:ECC DISABLE £ DIAG CHECK MODE 



TRAP 

iCHECKBITS ALREADY IN LOC 
«CH(DIS:BIS •BITl !BIT2.CSR 
CALL CSROUT 
RTI 

.SBTTL TRAP ECC DISABLE, CHECK MODE. L WRITE CHECKBITS IN 1 SELECTED CSR 
iCHECKBITS ALREADY IN LOC "CSR" 
<CHK1DIS:BIS tBITl !BIT2.CSR lECC DISABLE £ DIAG CHECK MODE 

LQADCSR 
RTI 



CvnjABO 
TRAP 



MSVll-J ME«0«Y OIAG. 
FCC OIS/WLE. CMCCK MODE 



HACRO Y0S.02 nonday 07.0ct-85 16:57 Pag* SOS 
, £ URITE CHECKBITS IH 1 SELECTED 



SEQ 0271 



99S6 0SS202 



99S7 

99se 

WS9 
9940 



9^1 
9942 

994S 
9944 

9945 



9946 

9947 

9948 

9949 
9950 
9951 

9952 



9953 
9954 
9955 
9956 
9957 



9958 



0SS2O2 
0S5?02 
OS5204 
035210 
035210 
0S5210 
0SS210 
035214 
035214 
035216 
035216 
035220 
035222 
035222 
035222 
035222 
035224 
035226 
035226 
035234 
035242 
035244 
035244 
035244 
035244 
035244 
035246 

035250 



035250 
035250 
035252 
035254 
035260 
0S5262 
0S5264 
035272 
035272 
0S5274 
035276 



csRouT: suersT 



i*SUBTEST 



010146 

013701 002224 



005037 002152 

006301 

lOSOOl 
104425 



C05701 
001407 

062737 000002 
0:3727 002152 
003764 



012601 
000207 



POSH 



<<SUBR 

sueR 

Rl 



URITE IN ALL CSR'S>> 
URITE IN ALL CSR'S 



iGET CSR'S BYTE 
FOR CSRNO :- #0 TO #36 BY *2 



nOV TOTCSRS.Rl 
BEGIN LCSROUT 



ASL 

ON. ERROR 



Rl 



002152 
000036 



LOAOCSR 
END I OF ON. ERROR 

IF Rl EQ *0 THEN LEAVE LCSROUT 



ENO lOF FOR CSRNO 



END LCSROUT 
POP Rl 
RETURN 
tINVALID: SUBTST 



MOV R1,-(SP) 



B62 : 1 1 i 1 1 > 

CLR CSRNO 
B6S: 1 1 1 1 1 > 



BCC L345 

L345:jij JM 

TST Rl 
BEQ E62 

AOO n.CSRNO 

CtIP CSRNO. #36 

BLE B63 

E63 : 1 i I i 1 1 i 

E62 : 1 1 1 1 1 i 

NOV (SP)*.R1 



<<TRAP INVALIDATE BACKGROUND PATTERN>> 



{•SUBTEST 



010046 
010146 

013701 002102 

006301 

006301 

042761 020000 

012601 
012600 
000002 



002666 



PUSH 



nov 

ASL 
ASL 
BIC 
POP 



RTI 



TRAP 
RO.Rl 



INVALIDATE BACKGROUND PATTERN 



BANK.Rl 

Rl 

Rl 

•6ITl3.CaNFI6*2(Rl) 
Rl.RO 



NOV RO.-(SP) 
NOV Rl.-(SP) 



MOV (SP)».R1 
MOV (SP)».RO 



CVnjAeo nswil J rCnCWY OIAC. macro Y05.02 
TRAP INVALZOATC BACKGROUND PATTERN 



nonday 07 -Oct -85 16:57 Pmgt S04 



SCQ 0272 



9960 OSS 500 



9961 



99*2 
9MS 



9MS 



99»7 



9M9 
9970 
9971 
9972 
997S 
9974 
9975 
997» 
9977 
997S 
9979 
9M0 
99tl 
99«2 
99fS 



9MS 



17 
M 
99«9 



9991 
9992 
999S 



9997 



035500 
055500 
055902 
055904 
095906 
095910 
095914 
0SSS20 
095922 
095926 
095990 
095994 
095940 
095944 
095946 
095952 
095954 
095956 
095960 
095962 
095966 

095970 
095974 
095400 
095404 
095410 
095412 
095416 
095420 
095420 
095422 
095426 
095494 
099440 
019446 
099492 
099494 

oISm 

019460 
>99462 



10000 
10001 

loeog 

lOOOS 
10004 
10005 
10006 

10007 




019912 
019514 
099916 
099922 



010046 
010146 
010246 
010946 
015705 
005797 
001009 
019700 
000402 
019700 
072027 
005797 
001002 
042700 
000901 
006201 
006201 
006201 
042701 
060100 

019701 
072127 
04270* 
005797 
001024 
005797 
001421 

010046 
019702 
092762 
016200 
042762 
042700 
006900 
006900 
060001 

012600 
020001 
001420 
009797 
001411 
062700 
005797 
001002 
062700 
020001 
001404 
009797 
001001 



lERRGEN: 



SUeTST<<TRAP 



GENERATE AND TEST ERROR AOORESS>» 



i*SUeTEST 



TRAP 



GENERATE AND TEST ERROR ADDRESS 



PUSH 



R0.R1.R2.R9 



002104 
002456 

172246 

177646 
177779 
002192 

177600 



177775 



002150 
177779 
177600 
002454 

002192 



002152 
040000 
172100 
040000 
177097 



6«: 

7l! 



II: 



172100 
172100 



2ti 



002196 

000100 
002140 

000100 
002066 



4«: 

91: 



NOV 
TST 



NOV 

BR 

NOV 

AiH 

TST 

BNE 

BIC 

SMAB 

ASR 

ASR 

ASR 

BIC 

ADD 

I GET 

NOV 

ASH 

BIC 

TST 



TST 
BEQ 
PUSH 

NOV 
BIS 
NOV 
BIC 
BIC 
ASL 
ASL 
AOO 
POP 

BEQ 

TST 
BEQ 
ADD 

TST 



AOO 



BEQ 

TST 



BANKIN0EX,R9 

NOSUPER 

61 

SIPAR9.ro 
7» 

UIPAR3.ro 
4-5. RO 
EQFLAG 
II 

♦tC177.R0 

Rl 

Rl 

Rl 

Rl 

*tC2.Rl 
Rl.RO 

ERROR ADDRESS FRON CSR 
CSR.Rl 
♦-5.R1 
#tC177.Rl 
N022BIT 
21 

EOFLAG 

21 

RO 

CSRN0.R2 

«BIT14.CSRA00(R2) 

CSRM)D(R2).R0 

4eiT14.CSRMX)(R2) 

•tC740,R0 

RO 

RO 

RO.Rl 
RO 

RO.Rl 
51 

INTFLAG 
91 

#100. RO 

INT64K 

41 

#100. RO 

RO.Rl 

51 

SKPERR 
51 



NOV RO.-(SP) 
NOV Rl.-(SP) 
NOV R2.-(SP) 
NOV R3.-(SP) 



{GENERATE UHAT ERROR ADDR SHOULD BE 



I GET CURRENT ADDRESS BITS 11 AND 12 



>ADO THEN TO THE ADJUSTED PAR VALUE 
UNDER TEST 



lis THIS AN 11/85. 11/29 -B OR 11/29 7 
(BRANCH IF NOT NECESSARY 
lis IT EQB7 
(BRANCH IF NOT 

I SAVE GENERATED ERROR ADDRESS 

NOV RO.-(SP) 

iGET CSR NUNKR 

(TURN ON EQB BIT CAREFULLY 

I GET CSR CONTOiTS 

I TURN OFF EQB BIT CAREFULLY 

I CLEAR EVERYTHING BUT ERROR ADDR 

t SHIFT AOOR BITS 18-21 INTO POSITION 
iMO TO CURRENT ERROR AOORCSS 

NOV (SP)*.RO 

iCOHPARE REAL AND GENBIATEO ERR. 

iMANCH IF THEY ARE THE SANE 
I INTERLEAVED? 
iNO - UE HAVE AN ERROR 

i64K INTERLEAVED NENORY? 



tmn. UE SUPPOSED TO SKIP ERROR P.O. 
I YES • SKIP ERROR PRINTOUT 



CVflJABO riSVll-J MEMORY OIAG. MACRO YDS. 02 
TRAP CCNCRATE AND TEST ERROR ADDRESS 



51; 



Monday 07. Oct -85 16:57 Pag* 304-1 



SEQ 0275 



10008 


05SS24 


104462 


10009 


035526 


010137 


10010 


035532 


005037 


10011 


03S3S6 






035536 


012603 




035540 


012602 




035542 


012601 




035544 


012600 


10012 


035546 


000002 


10013 






10014 


035550 





10015 035550 

10016 035554 

10017 0S5S62 

10018 0SSS64 
10019 

10020 035566 



10021 035566 

10022 03bS72 

10023 035600 

10024 035602 
10025 



005037 002150 

052737 000004 002150 

104425 

000002 



005037 002150 

052737 040004 002150 

104425 

000002 



PERR36 

MOV 
CLR 
POP 



Rl. ERR ADO 

SKPERR 

R3.R2.R1.ro 



RTI 

tCBREG: SUBTST <<TRAP 



(ELSE PRINT ERROR ADDRESS ERROR 
(SAVE CSR'S ERROR ADDRESS 
I ENABLE THE ERROR PRINTOUT AGAIN 
{RESTORE REGISTERS 

MOV (SP)».R3 
MOV (SP)*.R2 
MOV (SP)..R1 
MOV (SP)*.RO 



(•SUBTEST 



TRAP 



ENAP.E CHECKBIT REGISTER>> 
ENABLE CHECKBIT REGISTER 



CLR CSR 

BIS •BIT2.CSR 

LOAOCSR 

RTI 

ISYNREG: SUBTST <<TRAP 



(ENABLE DIAGNOSTIC MODE 
iLOAD CSR REGISTER 



I' 



(•SUBTEST 



TRAP 



ENABLE SYNDROME BIT REGISTER>> 
ENABLE SYNDROME BIT REGISTFR 



CLR CSR 

BIS 4BIT14!BIT2.CSR 

LOAOCSR 

RTI 



(ENABLE DIAGNOSTIC MODE 
(LOAD CSR REGISTER 



CvnjABO nsvil . 

TRAP 

10028 03S604 



10029 
10050 
10051 
10052 
10055 
10054 
10055 
10056 
10057 
10058 

10059 035604 
055604 
055606 
055610 
055612 
055614 
055616 
055622 
055626 
055632 
055656 
055640 
055644 
055650 
035654 
035660 
035662 
035664 
055666 
055672 
055676 
035704 
055706 
055712 
055716 
055722 



rCnORY DIAG. nACRO r05.02 
ENABLE StNOROnE BIT REGISTER 



nonday 07-C)ct-8S 16:57 Pag* 506 



SEQ 0274 



10040 
10041 
10042 
10045 
10044 
10045 
10046 
10047 
10048 
10049 
10050 
10051 
10052 
10055 
10054 
10055 
10056 
10057 
10058 
10059 
10060 
10061 
10062 
10065 
10064 
10065 
10066 
10067 
10068 
10069 
10070 
10071 
10072 
10075 
10074 
10075 
10076 



055724 
05S730 
055752 

035756 
055742 
055746 
035750 
055754 
035760 
055762 
055766 
055770 
055774 
055776 
036002 



010046 
010146 
010246 
010446 
C10546 
012700 
012701 
012704 
00573-' 
001404 
012701 
012704 
012702 
012705 
012021 
010224 
077505 
012741 
012741 
022757 
001007 
012704 
012705 
052724 
077505 

022705 
001516 
072327 

012701 
005757 
001402 
012701 
012702 
010521 
062703 
077204 
005757 
001442 
162701 
010102 



172540 
172240 
172200 
002456 

177640 
177600 
077406 
000010 



177600 
177400 

000005 004064 

172206 
000004 
100000 



000200 

000011 

172246 
002456 

1 /7646 
000004 

000200 

002240 

000010 



SUeTST<<SUBR 



I *SUBTEST 



SUBR 



MAPPER >> 
nAPPER 



tTHlS SUBROUTINE MAPS THE MEMORY BANK ( 16K UOROS ■ 1 BANK) 
ilN R5 TO THE TEST PATTEPN AREA (SUPERVISOR VIRTUAL (60000 
I THE 11/85 i USER VIRTUAL (60000 - 157777) TOR ALL OTHERS. 
I 

; 



157777) FOR 



I CALL 



MAPPER: 



MOV 

CALL 

RETURN 



BANK NO, R3 
MAPPER 



(SET UP BANK ARGUEMENT 
(ACTUAL CALL 
(ONLY RETURN 



I SET SUPERVISOR /USER UP FOR 1 TO 1 MAP 
PUSH R0.R1.R2.R4,RS 



MOV RO. 
MOV Rl. 
MOV R2. 
WV R4. 



4»: 

1»: 

30*! 

551; 
40»i 



S»: 
2*: 



MOV MIPARO.RO 

MOV «SIPAR0,R1 

MOV •SIP0RO.R4 

TST NOSUPER 

BEa 4t 

MOV #UIPAR0.R1 

MOV «UIPDR0.R4 

MOV «77406.R2 

MOV «8..RS 

MOV (R0)*.(R1)» 

MOV R2.(R4)* 

SOB R5.lt 

MOV #177600. -(Rl) 

MOV #177400. -(«»1) 

CMP #5.PR0TYP 

BNE 401 

MOV #SIPDR0*6.R4 

MOV •4.,RS 

BIS #8IT15.(R4)* 

SOB RS.55I 

tSET UP SUPERVISOR/USER FOR 

CMP #200. R5 

BEQ 51 

ASH #9.,R3 

MOV #SIPAR3.R1 

TST NOSUPER 

BEQ S« 

MOV #UIPAR5.R1 

MOV #4.R2 

MOV R5.(R1)* 

ADD #200, R5 

SOB R2.2* 

TST SPLTCSR 

BEQ 9t 

SUB #10. Rl 

MOV R1.R2 



(SP) 
(SP) 
(SP) 
(SP) 
(SP) 



MOV R5. 

FIRST AREA TO MAP TO 
FIRST ADDRESS REGISTER 
FIRST DESCRIPTOR REGISTER 
CAN WE USE SUPERVISOR MODE? 
YES. BRANCH 

FIRST ADDRESS REGISTER 
FIRST DESCRIPTOR REGISTER 
CONSTANT FOR 4K PAGE. UP. R/U 
(COUNTER 

PUT IN SUPERVISOR ADDRESS 
PUT IN SUPERVISOR DESCRIPTOR 
LOOP TILL DONE 

: CORRECT LAST FIELD FOR PERIPHERALS PAGE 

sis THIS A 11/73/85/84? 
{BRANCH IF NOT 
{POINT TO POR 3 
{COUNTER -4 

{SET UNCONDITIONAL CACHE bYPASS IN PDR3-6 



TEST AREA 

{MAP NOTHING (1 TO 1)? 
{YES - SKIP 

{BANK 1 STARTS AT 100.000 LESS 6 LSB'S 
{FOR MEMORY MANAGEMENT - 1000 
(SETUP FOR AUTO INCREMENTING 
sOO WE HAVE SUPERVISOR MODE? 
'YES - BRANCH 

(SETUP FOR AUTO INCREMENTING 

{COUNTER 

(PLUG IN PAR INFO 
:BUMP ADDRESS 4K 
(LOOP TILL DONE 



SUBR 



10077 
10078 
10079 

looao 
looai 

10062 
10083 
10084 
1008S 
10086 
10087 
10066 
10069 
10090 
10091 
10092 
1009S 
10094 
10095 
10096 
10097 
10098 
10099 
10100 
10101 
10102 
10103 
10104 
10105 
10106 
10107 
10108 
10109 
10110 
10111 
10112 
10113 
10114 
10115 
10116 
10117 



10118 
10119 
10120 



10121 
10122 
10123 



nsvii-j 


MEMORY 


OIAG. 


MACRO r05.02 


MAPPER 








036004 


062702 


000004 




036010 


022737 


000001 


002240 


036016 


001403 






036020 


010200 






036022 


010102 






036024 


010001 






036026 


012122 




101: 


036030 


011112 






036032 


013700 


002104 




036036 


005737 


002140 




036042 


001403 






036044 


012700 


004000 




036050 


000402 






036052 


012700 


010000 


111: 


036056 


005/37 


002456 


121: 


036062 


001403 






036064 


012701 


177652 




036070 


000402 






056072 


012701 


172252 


131: 


036076 


C60021 




141: 


036100 


060011 







036102 
036110 
036112 
036116 
036120 
056126 
036130 
036132 
036140 
036142 
036146 
036150 
036156 
036160 
036166 
036166 
036170 
0S6172 
036174 
036176 
036200 

036202 
036202 
036204 
036206 
036210 
036212 
036214 
036222 
036224 



022737 
001010 
005737 
001423 
022737 
001017 
000404 
022737 
001012 
005737 
001404 
013737 
000403 
013737 

012605 
012604 
012602 
012601 
012600 
000207 



010046 
010146 
010246 
010346 
010446 
013737 
005000 
012701 



000007 
002454 
000007 

000177 
002456 
177652 
172252 



002556 9t: 

002102 

002102 7$: 
8t: 

177654 

172254 6t: 
3t: 



$KMAP 



172354 
172^40 



036306 



Monday 07 -Oct 65 16:57 Psq* 306-1 



SEQ 0275 



AOO 


*4.R2 


CMP 


♦l.SPLTCSR 


BEQ 


101 


MOV 


R2.RC 


MOV 


R1.R2 


MOV 


RO.Rl 


MOV 


iRl)» .(R2)» 


MOV 


{R1).{R2) 


MOV 


bankindex.ro 


TST 


INT64K 


BEQ 


111 


MOV 


«4000.R0 


BR 


121 


MOV 


•10000. RO 


TST 


NOSUPER 


BEQ 


131 


MOV 


•UZPAR5.R1 


BR 


141 


MOV 


•SIPARS.Rl 


ADD 


R0.(R1)» 


ADD 


RO.(Rl) 



:IP UE ONLY HAVE AN 124K SYSTEM. UE DON'T WANT TO TEST THE 
iLAST 4K. WHERE THE Q-BUS DEVICE PAGE IS. INSTEAD. THE 
jPROGRAM WILL REMAP THE LAST 4K TO 6-12K. ALSO. IP THERE 
a IS A BANK 177 ON AN 11/63. THE PROGRAM MILL REMAP THE LAST 
,4K TO 6-12K PQR THE SAME REASON. 

11/63. H/2S-B OR 23? 
BRANCH IF SO 
BANK 7? 
NO - BRANCH 



CMP 


«7.LASTBANK 


BNE 


71 


TST 


N022BIT 


BEQ 


31 


CMP 


«7.BANK 


BNE 


31 


BR 


61 


CMP 


•177.BAM< 


BNE 


31 


TST 


NOSUPER 


BEQ 


61 


MOV 


UIPARS,UIPAR6 


BR 


31 


MOV 


SIPAR5.SIPAR6 


POP 


R5.R4, R2.R1.ro 



MOV (SP)».R5 
MOV (SP)».R4 
MOV (SP)».R2 
MOV (SP)».R1 
MOV {SP)».RO 

RETURN 

.SBTTL TRAP MAP KERNEL (ALMOST 1 TO 1) TRAP HANDLER 

PUSH RO.Rl. R2.R3.R4 ^ ^ 

MOV RO.-(SP) 
MOV Rl.-(SP) 
MOV R2.-(SP) 
MOV R3.-{SP) 
MOV R4. (SP) 

MOV KIPAR6.SVKPAR6 

CLR RO ;1ST AREA TO MAP TO 

MOV «KIPAR0,R1 : FIRST ADDRESS 



CVMJA80 MSVll J MCMORY DIAG. MACRO Y05.02 Monday 07 Oct-85 16:57 P»g« 306-2 
TRAP MAP KERNEL (ALMOST 1 TO 1 ) TRAP HANDLER 



SEQ 0276 



10124 
10125 
10126 
10127 
10128 
10129 
10130 
10131 
10132 
10133 
10140 



10141 
10142 



036230 
036234 
0S6240 
0S6244 
0S6246 
0S62S0 
036254 
0S62S6 
0S6262 
0S6266 
0S6272 
0S6272 
0S6274 
036276 
036500 
0S6S02 
036304 
036306 



012702 
012703 
012704 
010021 
010223 
062700 
077405 
012741 
0 :'741 
01-711 

012604 
012603 
012602 
012601 
012600 
000002 
000000 



077406 
172300 
000010 



000200 

177600 
177400 
036306 



MOV 
MOV 
HOV 

II: MOV 
MOV 
ADO 
SOB 
MOV 
MOV 
MOV 
POP 



RTI 

SVKPAR6: .WORD 



♦77406. R2 

«KIPDR0.R3 

«8. ,R4 

RO.(Rl)* 

R2.(R3). 

«200.R0 

R4.1I 

•177600. -(Rl) 
•177400. -(Rl) 
SVKPAR6.(R1) 
R4.R3.R2.R1,R0 



{CONSTANT FOR 4K PAGE.UP.R/U 
ilST PACE DESCRIPTOR REGISTER 
I COUNTER 

(PUT IN KERNEL ADDRESS 

(PUT IN KERNEL OISCRIPTOR 

tADO ADDRESS CONSTANT FOR 4K CHANGE 

(LOOP TILL D(mE 

,THE PERIPHERALS PACE TO KIPAR7 
:ANO NEXT LOWER PAGE TO KIPAR6 



HOV (SP)».R4 
MOV (SP)..R3 
MOV (SP)».R2 
MOV (SP)..R1 
MOV (SP)».RO 

s:K SAVE THE XXDP V2 KPAR6 POINTER HERE 



CVnjABO nSVll-J MEMCMY DIAG riACRO Y0S.O2 rionday 07-0ct-8S 16:57 Pafl« 306 

TRAP MAP KERNEL (ALMOST 1 TO 1) TRAP HANDLER SEQ 0277 

10145 036310 RELOCATE : SUBTST <<RELOCATE PROGRAM>> 



i*SUBTEST RELOCATE PROGRAM 



> 



10146 


036310 








IF •SU12 SET. IN 8SUR THEN IRETURN ERROR 








036310 


032777 


010000 


144320 




BIT 


♦SU12.SSUR 




036316 


001402 








BEQ 


L346 




036320 


000261 








SEC 






036322 


000207 








RTS 


PC 




036324 










L346; 1 i t i i i 




10147 


036324 








IF APTFLAG IS TRUE OR ACTFLAG IS TRUE 








036324 


005737 


002352 






TST 


APTFLAG 




036330 


001003 








BNE 


L347 




036332 


005737 


002350 






TST 


ACTFLAG 




036336 


001405 








BEQ 


L350 




036340 










L347: i 1 1 1 1 1 




10148 


036340 








IF IPASS NE *0 THEN IRETURN ERROR 






036340 


005737 


056724 






TST 


IPASS 




036344 


001402 








BEQ 


L351 




036346 


C00261 








SEC 






036350 


000207 








RTS 


PC 




056352 










L3S1: : ! s 1 s ! 




10149 


036352 








ENOi OF IF APTFLAG 






036352 










L350: i : s t > : 




10150 


036352 








BEGIN LOAOERBANK 






036352 










B64 :;{:::; 




10151 


036352 








FOR BANK :- 01 TO LASTBANK 






036352 


012737 


000001 


002102 




MOV 


Ol.BANK 




056360 










B65 : : s s i i s 




10152 036360 


004737 


037760 




CALL EXBANK 






10153 


036364 








IF ACFLAG IS TRUE AND PFLAG IS FALSE 


AND BMFLAG IS FALSE 




036364 


005737 


002116 






TST 


ACFLAG 




036370 


001431 








BEQ 


L352 




036572 


005737 


002122 






TST 


PFLAG 




036376 


001026 








BNE 


L352 




036400 


005737 


002130 






TST 


BMFLAG 




036404 


001023 








BNE 


L352 


10154 


036406 


013700 


002102 




MOV BANK.RO 






10155 


036412 


010037 


002432 




MOV R0.L0A06ANK 






10156 


036416 


013701 


002576 




MOV LOAOHOME.Rl 






10157 


036422 


004737 


037350 




CALL BANKMOV 

CALL NEULOAO iMAP NEU 






loisa 


036426 


004737 


037702 




LOADER BANK IN KERNEL 


10159 


036432 


013701 


002104 




MOV BANKINOEX , Rl 






10160 


0S64S6 


052761 


100000 


002666 


BIS •BIT15.C0NFIG*2(R1) 


sMARK LOADER 




10161 


036444 


042761 


020000 


002666 


BIC toIT13,C0NFIG*2CR1j 


I INVALIDATE BACKGROUND PATTERN 


10162 


036452 








LEAVE LOAOERBANK 








036452 


000416 








BR E64 


10163 


036454 
036454 








END J OF IF ACFLAG 


L352: : s s s s : 




10164 


036454 








END sOF FOR BANK 








036454 


005237 


002102 






INC 


BANK 




036460 


023737 


002102 


002556 




CMP 


BANK. LASTBANK 




036466 


003734 








BLE 


B65 




036470 










E65: : i i i s s : 




10165 


036470 








IF •SU13 OFF. IN 8SUR 








036470 


032777 


020000 


144140 




BIT 


«SU13.8SUR 




036476 


001002 








BNE 


L353 



cvnjABo nsvii-J nenoRY oiag. 

RELOCATE PROGRAM 



MACRO YO^ 02 Monday 07-Oct 65 16:57 Pag* 308-1 



SEQ 0278 



10166 


036500 






036500 


104401 


10167 


036504 






036504 




10166 


036304 






036504 


000261 




036506 


000207 


10169 


036510 






036510 




10170 


036510 






036510 




10171 


036510 


013702 


10172 


036514 


006302 


10175 


036516 


006302 


10174 


036520 






036520 


012701 




036524 




10175 


036524 






036524 


CS2761 




036532 


001035 


10176 


036534 






036534 


032761 




036542 


001031 


10177 


036544 






036544 


033761 




036552 


001425 


10176 


036554 






036554 


032761 




036562 


001460 


10179 


036564 






036564 


032761 




036572 


001405 




036574 


032761 




036602 


001001 


10180 






10181 


036604 






036604 


000447 


10182 


036606 






036606 




10163 


036606 






036606 


005737 




036612 


001005 


10184 


036614 






036614 


012737 


10165 


036622 


010137 


10166 


036626 






036626 




10167 


036626 






036626 




10166 


036626 






036626 




10169 


036626 






036626 




10190 


036626 






036626 


062701 




036632 


020102 



070246 



002556 
000004 

000201 002664 

100000 002666 

002106 002664 

000400 002666 

000100 002664 

000200 002664 



002536 



177777 002536 
002540 



TYPE MSG075 
TYPEIT .MSG075 
.OSABL CRF 

END I OF IF »SU13 

(RETURN ERROR 



END LOADERBANK 
BEGIN FINOBANK 



I RELOCATION NOT POSSIBLE 



LS53: i { t i i i 



SEC 

RTS PC 



E64 : s I t I I i 

B66 : : s i ; : i 



MOV LASTBANK , R2 

ASL R2 
ASL R2 |R2 <- R2 « 4 

FOR Rl :- *2*2 TO R2 BY *4 

MOV •2*2. Rl 

B67: 1 : 1 1 i t 

IF «BIT7!BIT0 OFF. IN CONFIG(Rl) >IF NO ERRORS 6 NOT PROGRAM SPACE 

BIT «BIT7!BIT0.C0»nG(Rl) 
BNE L354 

IF »BIT15 OFF. IN C0NFIG*2(R1) jIF NOT LOADER BANK 

BIT *BIT15.C0NFIG»2(R1) 
BNE L355 

IF CPUBIT SET. IN CONFIGCRl) :IF ACCESSABLE 

BIT CPUBIT. CONFIGCRl) 
BEQ L356 

IF #BIT8 OFF. IN C0NFIG*2(R1) THEN LEAVE FINOBANK ;IF PARITY 

BIT «BIT8.C0NFIG»2CR1) 
BEQ E66 

IF «BIT6 SET. IN CONFIGCRl) AND *BIT7 OFF. IN CONFIGCRl) 

BIT #8116. CONFIGCRl) 



I IF 1ST PROTECTABLE ECC BANK 
LEAVE FINOBANK 

END I OF IF ♦aiT6 

IF INHECC IS FALSE 



BEQ L357 
BIT *BIT7. CONFIGCRl) 
BNE L357 



BR E66 
L357 : 1 1 : > 1 1 



000004 



SET INf.£CC 

MOV Rl.INHBANK 
END: OF IF INHECC 

END tOF IF CPUBIT 

END I OF IF «6IT1S 

END I OF IF ♦BIT7 

END I OF FOR 



TST INHECC 
BNE Li60 

MOV 0-1. INHECC 



L360: 1 1 1 i I i 
L3S6: i i > I : i 
L355: i 1 1 i i t 
L354 : 1 1 1 ] 1 s 



ADO 44.R1 
CMP R1.R2 



cvnjABO nsvii-j nEnoRr diag. 
RELOCATE PROCAAri 





036634 


003733 






036636 






10191 


036636 






036636 


005737 


002542 




036642 


AA 4 A 4 O 

001012 




10192 


036644 








036644 


AAK YV Y 

0O3737 


AAOdf 

002536 




096630 


AA4 AAY 

001407 




10193 


036632 


A 4 V Y A 4 

013701 


O02540 




0966 3o 


A0*707 


AAOTAA 


10195 


096664 


AA 4 A ^ 4 

001421 




10196 


096666 


AAA^ OA 




10197 


09o670 








AVXX YA 

0966 rO 






10196 


0966 lO 








036670 






10199 


036670 


005037 


002536 


1020U 


0966 f * 








09e6 '4 


ATO"?"?"? 

UOc r r r 


A9AAAA 




AY^YA^ 


AA« AAJL 








UcO r ^ r 




lOcOc 




AA1 At\0 






ATil7l A 












A7A9Alk 
V r Vs^O 




AVA7^A 
f eU 
















UdO few 








UOO r CV 








woo (CC 


AAA9A7 






AYC.70A 
UOO r 














1 AOA7 












AACAT7 




10206 


036730 


042761 


020000 


10209 


036736 


005000 




1 A9 1 A 




U r XUc r 


AAA AAA 


1 A31 1 












A1 AAY7 




• A0 1 O 




UXd r O r 




10213 


036756 


004737 


0S7S16 


10214 


036762 










U^c r O r 




10215 


AVil77A 








ATi>77A 




AAA7X9 




AVA77A 


AAAAAA 








1 AAAAA 






037000 


000000 




10216 


037002 


104417 




10217 


037004 


042737 


000001 


10216 


037012 


004737 


037600 


10219 


037016 


013700 


002510 


10220 


037022 


006300 




10221 


037024 


006300 




10222 


037026 


016002 


002664 



riACRO Y05.02 Monday 07-0ct-85 16:57 Pag« 308-; 



IF FULLREL IS FALSE 



000030 



143734 

000030 



SKUB: 



002666 RELENT 1 
RELOCl: 

002534 

177776 



IF INHECC IS TRUE 



MOV INH8ANK.R1 
CnP REALPAT.*30 
BEQ RELENT 1 
BR RELENT 1 
END I OF IF INHECC 

ENOj OF IF FULLREL 

CLR INHECC 

IF «SU13 OFF. IN SSUR 



CMP REALPAT,«30 
BEQ SKUB 
TYPE MSG075 

TYPEIT .MSG075 

.OSABL CRF 
END tOF IF «SU1S 

(RETURN ERROR 



END FINOBANK 

CLEAR INHECC 

: BIC «6IT13.C0NFIG*2(R1) 
CLR RO 
DIV «4.R0 
LET NEU8ANK RO 



PGnCSR.PGMCSR»2 
USERMAP 



177572 JMPRLl: 



MOV 
CALL 
USER 

BIS «6IT15!BIT14.PSU 

.DSABL CRF 

BMCV 0.100000. SIZE 

JSR RS. BLOCKS 

SIZE 

100000 

0 

.DSABL CRF 
KERNEL 

BIC •BITO.nNRO 
CALL NEUKERNEL 

MOV neubank.ro 

ASL RO 
ASL RO 

MOV C0NFIG(R0).R2 



BLE B67 

E67: ( 1 1 i I i i 



TST FULLREL 
BNE L361 

TST INHECC 
BEQ LS62 



lis THIS PATTERN 307 
{YES - SKIP MESSAGE 



L362: I i 1 1 : i 

L361 : i ( 1 1 i I 
(MAKE SURE FLAG IS TURNED OFF! 

BIT «SU13.8SUR 
BNE L363 

IS THIS PATTERN 30? 
YES - SKIP MESSAGE 
RELOCATION NOT POSSIBLE 



L363: ::::>> 
SEC 

RTS PC 

E66 ::::::: 

:IF UE RELOCATED PROPERl Y. THIS SHOULD BE OFF 

CLR INHECC 
{INVALIDATE BACKGROUND PATTERN 



MOV RO.NEUBANK 

:SAVC CURRENT PGM. CSR 
;MAP NEU8ANK TO USER PAR 
i ENTER USER MODE 

(GO TO USER MODE 

I MOVE PROGRAM 



i ENTER KERNEL MODE 
(OEENERGIZE MEMORY MANAGEMENT 



iRO <- RO * 4 



CvnjABO 


MSVll J 


nEMORY 


OIAG. 


RELOCATE PROCRAM 






AT7AT9 












177760 














V^c f ^ f 


000001 


lUcc > 






002532 


1 noon 






010000 














ni A(M9 


002664 


10231 

Ave 


037070 


042702 


007777 


102S2 


037074 


072227 


177775 


102SS 


037100 


052702 


100000 


10254 


037104 


050237 


002532 


10235 


037110 








037110 


012737 


177777 


10236 


037116 








037116 


000241 






037120 


000207 





MACRO Y05.02 Monday O7-Oct-0S 16:57 Pag* 308-3 



SEQ 0280 



1»: 



SUAB R2 

BIC ♦tC17.R2 

ASL R2 

BIS «6IT0.mR0 

MOV R2.PGHCSR 

BIT «BIT12.C0NFIG*2(R0) 

BEQ 1» 

nOV C0NFIG(R0),R2 

BIC ♦tC170000.R2 

ASH «-3.R2 

BIS «6IT15.R2 

BIS R2.PGHCSR 

SET RLFLA6 

(RETURN NOERROR 



(ENERGIZE MEMORY MANAGEMENT 
,PUT NEW PGM. CSR INTO PGMCSR 
lis THE NEW BANK INTERLEAVED? 
{BRANCH IF NOT INTERLEAVED 



nOV « l.RLFLAG 
CLC 

RTS PC 



cvnjABO nsvii J nEnoRY oiag. 

RELOCATE PROCRAtl 
102S9 037122 



nACRO Y0S.02 Monday 07 -Oct -85 16:57 Pag* 310 



SEQ 0281 



10240 
10241 

10242 
10243 
10244 
10245 
10246 

10247 
10248 
10249 

10250 
10251 
10252 
10253 
10254 
10255 

10256 

10257 
10258 



037122 
037122 
037124 
037130 
037134 
037140 
037144 
037144 
037150 
037156 
037162 
037166 
037174 
037202 
037206 
037212 
037220 
037220 
0S7224 
037224 



010046 
013701 
013700 
004737 
004737 

013746 
013737 
004737 
013701 
042761 
013737 
004737 
C1S701 
042761 

012637 

005037 



002432 
002576 
037350 
037702 

002102 
002432 
037760 
002104 
100000 
002576 
037760 
002104 
020000 

002102 

002536 



UNRELOCATE:SUeTST 



<<UNRELOCATE PROGRAn>> 



USUBTEST 



UNRELOCATE PROGRAM 



002102 



002666 
002102 



002666 



10259 


037230 


042737 


020000 


002666 


10260 


037236 










037236 


005037 


002310 




10261 


037242 


004737 


037516 




10262 


037246 










037246 


052737 


140000 


177776 


10263 


037254 










037254 


004537 


040732 






037260 


040000 








037262 


100000 








037264 


000000 






10264 


037266 


104417 






10265 


037270 


042737 


000001 


177572 


10266 


037276 


004737 


037600 




10267 


0S7S02 


013737 


002534 


002532 


10266 


037310 


052737 


000001 


177572 


10269 


037316 


005037 


002126 




10270 


037322 


012700 


002666 




10271 


037326 


042710 


020000 




10272 


037332 


062700 


0O0004 




10273 


037336 


020027 


003620 




10274 


037342 


003771 






10275 


037344 










037344 


012600 






10276 


037346 


000207 






10277 











(RESTORE LOADERS 

PUSH RO 

nOV LOADBANK.Rl 

MOV loadhome.ro 

CALL BANKMOV 

CALL NEULOAD 

PUSH BANK 

MOV LOADBANK.BANK 

CALL EXBANK 

MOV BANKINOEX.Rl 

BIC «BIT15.C0NFIG«2(R1) 

MOV LOADHOME.BANK 

CALL EXBANK 

MOV BANKINOEX.Rl 

BIC «BIT13.C0NFIG*2(R1) 

POP BANK 

CLEAR INHECC 



{RESTORE BANK 0 

eiC •BIT13.C0NFI6»2 

LET NEUBANK :- «0 



USERMAP 



«BIT15!BIT14.PSW 
CRF 

0,100000. SIZE 



II; 
2t. 



CALL 
USER 
BIS 
.DSA6L 

BMOV w.*—- w. 
JSR RS. BLOCKS 
SIZE 
100000 
0 

.DSABL CRF 
KERNEL 

BIC MITO.MMRO 

CALL NEUKERNEL 

MOV PGnCSR*2.PGMCSR 

BIS •BITO.HMRO 

CLR RLFLAG 

MOV #C0NFIG»2.R0 

BIC «BIT1S.(R0) 

ADD #4.R0 

Crff> R0.»3620 

6LE 2» 

POP RO 

RETURN 



MOV RO. (SP) 

iMAP NEW LOADER BANK IN KERNEL SPACE 

MOV BANK.-(SP) 

: CLEAR LOADER FLAG 

i INVALIDATE BACKGROUND PATTERN 

MOV (SP)*.BANK 
:MAKE SURE ECC TESTS ARE NOT INHIBITED! 

CLR INHECC 

.INVALIDATE BACKGROUND PATTERN 

CLR NEUBANK 

iMAP NEUBANK TO USER PAR 
S ENTER USER MODE 

:G0 TO USER MODE 

iMOVE PROGRAM 



: ENTER KERNEL MODE 
iOEENERGIZE MEMORY MANAGEMENT 

(RESTORE PREVIOUS PGM. CSR 
(ENERGIZE MEMORY MANAGEMENT 

(MOVE 2N0 UORD OF CONFIG TO RO 
(CLEAR BACKGROUND VALID BIT 
(INCREMENT TO NEXT BANK 
(DONE? 

(NO - BRANCH 



MOV (SP}*.RO 



CVnjAeO nSVll-J MEMORY DIAG. 
UNRELOCATE PROGRAM 



MACRO Y05.02 Monday 07-Oct 85 16:57 P»g« 312 



SEQ 026 



10280 057350 






BANKMOV : SUBTST 


<<M0VE BANKS>> 












!*SUBTEST 


MOVE BANKS 






102S1 






iMOVE 3/4 or A BANK 






10282 






i CALLING SEQUENCE 






10263 






iRO - DESTINATION BANK 






10284 






iRl - SOURCE BANK 






10265 037350 


104415 




SAVREG 








10286 037352 


004737 


037516 


CALL 


USERMAP 






10267 037356 


104416 




RESREG 








10286 037360 


104415 




SAVREG 








10289 037362 


072027 


000011 


ASH 


•9. ,R0 






10290 0S7S66 


072127 


000011 


ASH 


#9. .Rl 






10291 037372 


012702 


177650 


nov 


«UIPAR4.R2 






10292 037376 


012703 


000200 


MOV 


#200. R3 






10293 












10294 037402 


010122 




MOV 


R1.(R2)* 


sMAP 1ST 


HALF BANK 


10295 037404 


060301 




ADD 


R3.R1 


iBUMP BY 


4K 


10296 037406 


C10122 




MOV 


R1.(R2}* 




10297 037410 


060301 




ADD 


RS.Rl 






10298 












10299 037412 


010022 




MOV 


R0,(R2)* 






10300 037414 


060300 




ADO 


R3.R0 






10301 037416 


010022 




MOV 


R0.(R2}* 






10302 037420 


060300 




AD*^ 


R3.R0 






10909 












10304 037422 






USER 








037422 


052737 


140000 177776 


BIS 


•6IT15!BIT14.PSU 


I GO TO USER MODE 








. DSABL 


CRF 






10305 037430 






BMOV 


100000 . 140000 . SIZE/2 


jMOV 1ST 


HALF BANK 


037430 


004537 


040752 


JSR 


R5. BLOCKS 




037434 


020000 




SlZE/2 






037436 


140000 




140000 






037440 


100000 




100000 







.DSABL 



CPF 



CvnjASO nsvii-J rcnORY oiag. macro 
novE aANKS 



10506 


057442 


104417 


10507 






10508 


057444 


012702 


10509 






10510 


037450 


010122 


10511 


057452 


060301 


10512 


057454 


010122 


10515 


057456 


060501 


10514 






10515 


05^**0 


010022 


10516 


0574o>^' 


060500 


10517 


057464 


010022 


10518 


037466 


060300 


10519 






10920 


Y/\ 

037470 






03 f 4 /O 


032 li f 










057476 


C04537 




057502 


010000 




057504 


140000 




057506 


100000 


10522 


037510 


104417 


10523 






10324 


037512 


104416 


1032S 


037514 


000207 



Monday 07-0ct-65 16:57 P«9« 512-1 



KERNEL 

MOV 

MOV 
ADO 
MOV 
ADO 

MOV 
ADD 
MOV 
ADD 



I ENTER KERNEL mOE 



USER 
BIS 
. DSABL 
BMOV 



•UIPAR4.R2 

R1.(R2)» 
R3.R1 
R1.(R2)* 
R3.R1 

R0.(R2)* 
R3.R0 
R0.(R2)* 
R3.R0 



I MAP 2N0 HALF BANK 
sBUMP BY 4K 



•eiT15!BIT14.PSU 

CRF 

100000 . 140000 . SXZE/4 
JSR R5.BL0CK3 
SIZE/4 
140000 
100000 

.DSABL CRF 
KERNEL {ENTER KERNEL MODE 



:G0 TO USER MODE 
sMOV 3ND FOURTH 0" BANK 



RESREG 
RETURN 



cvnjABO nsvii-j nEnoRY oiag. 

nOVE BAM(S 



nACRO Y05.02 rionday 07 -Oct -85 16:57 Pmf S14 



1 VwCO 










0S7516 


012701 

WAS ' VA 


177640 




V J f vcc 


VAC * vc 


172340 


XVJ JX 




012703 

VAC ' 


177600 


10SS2 


0S7SS2 


012704 

WAS ■ w^ 


172300 






012705 

V AS ■ W^ 


000004 


10SS4 


0S7542 


012221 




lOSSS 


0S7S44 


011423 




10SS6 




077503 




10SS7 








lOSM 


037550 


013700 


002310 


10SS9 


037554 


072027 


000011 


10540 








10S41 


0S75«0 


012705 


000004 


10S42 


037564 


010021 




10343 


037566 


062700 


000300 


10344 


037572 


C11423 




10S4S 


037574 


077505 




1034« 


037576 


000207 




10347 








10348 


037600 







10349 



10350 
10351 
10352 
10353 
10354 
10355 
10356 
10357 
10358 



10359 
10360 
10361 



10362 
10363 
10364 
10365 
10366 
10367 
10368 
10369 



037600 
037600 
037602 
037604 
037606 
037612 
037616 

037622 
037626 
037630 
037634 
037636 
037636 
037640 
037642 
037644 

037646 



037646 
037652 
037656 
037664 
037670 
037674 
037700 



010046 
010146 
010546 

012700 
013701 
072127 

012705 
010120 
062701 
077504 

012605 
012601 
012600 
000207 



013705 
072527 
013737 
010537 
062705 
010537 
000207 



172340 
002310 
000011 

000004 
000200 



SCQ 0284 



USeftt1AP:SU8TST 



i*SUBTEST 



II: 



2*1 



nov 

HOV 

nov 
nov 
nov 
nov 
nov 

SOB 
nov 

ASH 

nov 
nov 

ADD 

nov 

SOB 

RETURN 



<<SUBR nAP USER TO NEW BAM(>> 
SUBR nAP USER TO NEW BANK 

* iCOPY KERNEL PAR'S 6 POR'S (0-3) 



•UIPARO.Rl 
•KZPAR0.R2 
«UZP0R0.R3 
•KIP0R0.R4 
#4 R5 

CR2)*,CR1)< 

(R4).(R3)* 

R5.1I 

neubank.ro 

•9..R0 

•4.R5 

RO.CRD* 
*200.R0 
(R4).(RS)* 
R5.2I 



iBANK 1 STARTS AT 100.000 LESS 6 LSB'S 
(FOR NEnORY nANAGEHENT - 1000 

(SETUP UIPAR(4-7) 
iBUnP AOORESS «K 
I SETUP UIPDR^- 



NEM<ERNEL:SUBTST 



(•SUBTEST 



SUBR 



<<SUBR SETUP KERNEL PAR'S FOR NEU BANK>> 
SETUP KERNEL PAR'S FOR NEU BANK 



PUSH RO.Rl.RS 



II: 



nov 

NOV 
ASH 

nov 

NOV 
ADO 
SOB 
POP 



•KIPARO.RO 
NEUBANK.Rl 
♦9. .Rl 

•4.RS 

Rl.(RO)* 
♦200, Rl 
RS.ll 
R5.R1.ro 



nov RO.-CSP) 

nov Ri.-(SP) 

nov R5.-(SP) 



iBANK 1 STARTS AT 100.000 LESS 6 LSB'S 
I FOR HEnORY nANAGEHENT - 1000 



{SETUP KIPAR(O-S) 



RETURN 

NAPKERNAL.-SUBTST <<SUBR NAP KERNAL PARS 4 AND 5 TO A BANK>> 



nov (SP)*.RS 
nov (SP)*.Ri 
nov (sp)*.m) 



(•SUBTEST 



SUBR 



nAP KERNAL PARS 4 AND 5 TO A BANK 



t' 



002102 
000011 

172350 002272 
172350 
000200 
172352 



now BANK.R5 

ASH •9..RS 

NOV KIPAR4.SAVPAR 

nov R5,KIPAR4 

ADD «200.RS 

nov R5.KIPAR5 

RETURN 



inOV BANK NUnBER TO R5 
;R5 ENTERS 100000 LESS SHIFT 
tSAVE OLD PAR 
iGET NEU PAR'S 



TO CREATE MAPPING 



cvnjASO 

SUBR 

10570 
10371 



10372 
10373 



10374 
10375 
10376 
10377 
10378 
1037» 



10380 
10381 
10382 



10383 
10384 
10389 
10386 



nSVll-J nCNORr OZAG. HACRO Y05.02 
riAP KERML PARS 4 AND 5 TO A 
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SCO 0285 



037702 



037702 
037702 
037704 
037706 
057712 
037716 
0J772O 
037724 
0S7726 
037726 
037730 
037732 

037734 



037754 
037742 
037750 
037756 



010046 
010146 

012701 172350 
072027 000011 
010021 

062700 000200 
010021 

012601 
012600 
000207 



013737 002272 172350 

062757 000200 002272 

013737 002272 172352 
000207 



NEyLOAO:SUBTST 



{•SUBTEST 



<<SUBR SETUP KERNEL PAR'S FOR NEW LOADER BANK>> 
SUBR SETUP KERNEL PAR'S FOR NEW LOADER BAIK 



iRO CONTAINS THE DESTINATION BANK 
POSH 



UNNAP: 



NOV 
ASH 
NOV 
ADO 
NOV 
POP 



RETURN 
SUBTST 



RO.Rl 



•KIPAR4.R1 
•9. .RO 

R0.(R1)« 
#200. RO 
RO.(Rl)* 
Rl.RO 



NOV RO.-(SP) 
NOV Rl.-(SP) 



(BANK 1 STARTS AT 100000 LESS 6 LSB'S (1000) 
t SETUP KIPAR4 



i SETUP KIPAR5 



NOV (SP)*.R1 
NOV (SP)*.RO 



<<SUBR UNNAP KERNAL PAR'S 4 AND 5>> 



(•SUBTEST 



SUBR 



UNNAP KERNAL PAR'S 4 AND 5 



NOV 
ADO 
NOV 
RETURN 



SAVPAR.KIPAR4 

•200.SAVPAR 

SAVPAR.KIPARS 



I RESTORE K1PAR4 

lAOO 200 FOR NEXT PAR 

(RESTORE KIPAR5 



CVMJA80 MSVll J MEMORr OIAG. MACRO t05.02 
SUBR UNTIAP KCRNAL PAR'S 4 mNO 5 
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SCQ 0286 



10S89 037760 



10S90 
10S91 
10392 
10S9S 
10394 
10395 
10396 
10397 
10398 
10399 
10400 
10401 
10402 
10403 
10404 
10405 
10406 
10407 
10408 

10409 037760 
037760 
037762 
037764 

10410 037766 
037766 
037772 

10411 037776 
037776 

10412 040004 
040004 
040010 
040014 

10413 040020 
040020 
040024 
040030 

10414 040034 

10415 040040 

10416 040042 

10417 040044 

10418 040050 

10419 040056 

10420 040060 
040060 

10421 040066 

10422 040072 
040072 
040076 
040100 
040104 

10423 040106 

10424 040112 
040112 



010046 
010146 
010246 

005037 
005037 



005037 
005037 
005037 

005037 
005037 
005037 
013701 
006301 
006301 
010137 
032761 
001403 

012737 
'>12700 

030037 
001405 
030061 
001002 
005037 



EXBANK: SUSTST <<SUeR 
•SUBTEST U «R 



EXAniNE BANK>> 
EXAMINE BANK 



DOES 
(1) 
(2) 
(3) 
(4) 
(5) 
(6) 



THE FOLLOUING: 
SETS UP "BANKINOEX* 



"BANK* 



SETS THE 
SETS THE 
SETS THE 
SETS THE 
SETS THE 



nEHORY. 



AND Rl BASED ON VALUE OF 
"HKFLAG" IF THE BANK IS ECC. 

"KPFLAG" IF THE BANK IS THE PROTECTED REGION OF ECC 
"ACFLAG" IF THE BANK CAN BE ACCESSED BY THIS CPU. 
"PFLAG" IF THE BANK IS IN PROGRAM SPACE. 

. _ "RRFLAG" IF RELOCATION IS REQUIRED TO TEST THIS BANK, HOUEVCR. 

IT COMPLEMENTS THIS FLAG IF THE RELOCATION FLAG "RLFLAG" IS SET (THIS IS 
NECESSARY FOR THE USE OF THE RECURSIVE "MODE" SUBROUTINES). THE -RRFLAG" 
IS ALWAYS SET TO DISABLE TESTING IF FIELD SERVICE MODE "SELECTED BANKS- 
ARE BEING TESTED AND THIS BANK IS NOT SELECTED. _ , 

SETS THE "BMFLAG- IF THE BANK IS A BAD MEMORY i HOUEVER, IT COMPLEHENTS 
THIS FLAG IF THE "WORST" FLAG IS NOT SET (THIS IS NECESSARY FOR THE USE 
OF THE RECURSIVE "MODE" SUBROUTINES). 
SETS THE "INTFLAG" IF THE BANK IS INTERLEAVED. 

SETS THE "INT64K" FLAG IF THE BANK IS INTERLEAVED ON 64K WORD BOUNDS. 
(10) SETS THE "SKIPMK" FLAG IF THIS BANK IS INTERLEAVED. AND HAS ALREADY 
BEEN TESTED. 



(7) 



(8) 
(9) 



PUSH 



R0.R1.R2 



002120 
002114 



012737 177777 002116 



002122 
002124 
002130 

002136 
002140 
002342 
002102 



002104 

000100 002664 



177777 002114 
000002 

002106 

002664 

002116 



CLEAR MKFL AG. KPFLAG 

SET ACFLAG 

CLEAR PFLAG. RRFLAG. BMFLAG 

CLEAR INTFLAG. INT64K. SKIPMK 



MOV RO.-(SP) 
MOV Rl.-(SP) 
MOV R2.-(SP) 



CLR 
CLR 



MKFLAG 
KPFLAG 



MOV #-1. ACFLAG 



]R1 <- Rl * 4 



1(; 



MOV BANK.Rl 

ASL Rl 

ASL Rl 

MOV Rl.BANKINDEX 

BIT •BIT6,C0NFIG(R1) 

BEQ U 

SET KPFLAG 

MOV «BIT1.R0 

U RO SET. IN CPUBIT AND RO OFF. IN CONFIG(Rl) 



CLR 
CLR 
CLR 

CLR 
CLR 
CLR 



PFLAG 

RRFLAG 

BMFLAG 

INTFLAG 

INT64K 

SKIPMK 



, PROTECTED REGION OF ECC MEMORY? 
:N0 SKIP 



CLR ACFLAG 
END sOF IF RO 



MOV KPFLAG 



BIT RO. CPUBIT 
BEQ L564 

BIT RO.CONFIG(Rl) 
BNE L564 



L364: 1 1 1 1 . i 



CvnjASO nsvii J MEnoRY diag. 

SUBR EXAMINE BANK 
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SEQ 0287 



104P5 
10426 
10427 
10428 
10429 
10430 
10431 
10432 

10433 
10434 
10435 
10436 

10437 
10430 
10439 



10440 
10441 
10442 
10443 
10444 
10445 

10446 
10447 
10448 
10449 



10450 

10451 

10452 
10453 
10454 

10455 
10456 
10457 

10458 
10459 
10460 

10461 



10462 



040112 
040116 
040120 
040124 
040126 
040132 
040136 
040140 
040140 
040146 
040152 
040160 
040162 
040162 
040170 
040176 
040200 
040200 
040206 
040214 
040220 
040222 
040226 
040234 
040236 
040236 
040244 
040250 
040252 
040256 
040256 
040262 
040264 
040272 
040274 
040274 
040302 
040302 
040302 
040310 
040312 
040312 
040320 
040326 
040330 
040330 
040336 
040344 
040346 
040346 
040354 
040354 
040356 
040360 
040362 



005^37 
001415 
016102 
000302 
042702 
020227 
003405 

012737 
000137 
032761 
001403 

012737 
032761 
001406 

012737 
012737 
C05737 
001402 
005137 
032761 
001403 

012737 
005737 
001002 
00S137 

005737 
001407 
032761 
001003 



032761 
001421 

012737 
032761 
001403 

012737 
032761 
001403 



002116 

002666 

177770 
000003 



177777 
040354 
000400 



177777 
00020 J 



177777 
177777 
002126 

002124 
000001 



177777 
002600 

002130 

002002 

040000 



012737 177777 



010000 



177777 
004000 



177777 
000040 



002130 
002666 2* : 



002120 
002664 3* : 



002122 
002124 

5t: 

002664 61: 

002130 

81: 
9»: 

002666 
002124 

00^666 



002136 
002666 



002140 
002664 



10*: 



TST ACFLAG 

8EQ 21 

MOV C0NFIG*2(R1),R2 

SWAB R2 

BIC #tC7.R2 

CMP R2.*3 

BLE 21 

SET BMFLAG 

JMP ENEXBK 

BIT •6IT8.C0NFIG*2(R1) 

BEQ St 

SET MKFLAG 

BIT «6IT7.C0NFIG(R1) 

BEQ 51 

SET PFLAG.RRFLAG 



TST RLFLAG 

BEQ 6* 

COM RRFLAG 

BIT •BITO.CONFIGrRl) 

BEQ 81 

SET BMFLAG 

TST WORST 
BNE 9* 
COM BMFLAG 

IF SELONLY IS TRUE AND «6IT14 

SET RRFLAG 
ENO iOF IF SELONLY 



BIT 
BEQ 
SET 

BIT 
BEO 

SET 

BIT 
BEQ 
SET 



012737 177777 002342 

012602 
012601 
012600 
000207 



ENEXBK: POP 



•BIT12.C0NFIG»2(Rl) 

ENEXBK 

INTFLAG 

•BIT11.C0NFIG»2(R1) 
101 

INT64K 

«BIT5.C0NFIG(R1) 

ENEXBK 

SKIPMK 

R2.R1.ro 



(ACTIVE MEMORY? 
i BRANCH IF NOT 



J ISOLATE MEM TYPE BITS 
J IS THIS AN ILLEGAL MEM TYPE? 
(BRANCH IF NOT 
.•SET BAD BANK FLAG 

MOV • 1. BMFLAG 

jJUMP OVER REST OF FLAG TESTS 

sIS THERE ECC THERE? 

:N0 - SKIP 

j<ES SET MKFLAG 

MOV 4-1. MKFLAG 

iBANK - PROGRAM SPACE? 
:N0 - SKIP 

MOV #-l.PFLAG 
MOV t-l. RRFLAG 

IS PROGRAM RELOCATED? 
NO - SKIP 

YES - COMPLEMENT REl OCATION REQUIRED FLAG 
ERRORS PRESENT IN THIS BANK? 
NO - SKIP 

MOV • 1. BMFLAG 
IS THIS A WORST FIRST PASS? 
J YES - SKIP 

iNO - COMPLEMEN. BAD MEMORY FLAG 
OFF. IN CONFIG. 2(R1) 

TST SELONLY 
BEQ L365 

BIT •6IT14.C0NFIG*2(R1) 
BNE L365 

MOV • 1. RRFLAG 



L365: ; : : s J J 
:IS THIS BANK INTERLEAVED? 
(BRANCH IF IT IS NOT 

MOV # I. INTFLAG 
ilS THIS BANK INTERLEAVED WITH 64K BOARDS? 
.-BRANCH IF IT IS NOT 

MOV •-1.INT64K 

(SHOULD THIS BANK BE TESTED? 
(BRANCH IF IT SHOULD 



(RESTORE REGISTERS 



RETURN 



MOV •l.SKlPm 

MOV (SP)..R2 
MOV (SP)».Rl 
MOV (SP)..RO 



CVrijABO HSVll J MEMWY OIMG. 
SUeR EXAMINE BANK 



10465 


040364 






10466 








10467 








1046S 








10469 


040364 


013700 


002134 


10470 


040370 


005 100 




10471 


040372 


013701 


002120 


10472 


040376 


074001 




10473 


040400 


000207 




10474 








10475 


040402 






10476 


040402 







10477 
10478 

10479 040402 
104S0 040406 
10461 040414 
10462 

10463 040416 
10404 040416 



104S5 040416 
10486 040424 
10487 

10488 040426 



10489 

10490 040426 

10491 040432 

10492 040440 



005237 
022737 
000207 



012737 
000207 



005237 
023737 
000207 



002112 
000030 



002102 
002556 
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BANKOK: SUBTST <<SUBR BANK 0K7>> 



002112 



000027 002112 



002102 



SEQ 0200 



J •SUBTEST 



SUBR 



BANK OK? 



;TEST TO INSURE THAT THE TYPE OF MEMORY IN THE PRESENT BANK 
lis OF THE TYPE WE ARE TESTING "TMFLAG". 
(RESULT IS RETURNED IN THE CONDITION COOES (OK • (-Oi). 



MOV 
COM 
MOV 
XOR 

RETURN 



TMFLAG.RO 
RO 

MKFLAG.Rl 
RO.Rl 



INCRPT 
INCPAT 

!*SUBTEST 



,0K - (-0K) 

SUBTST <<SUBR INCREMENT PATTERN TESTING >> 



SUBR 



INCREMENT PATTERN TESTING 



J INCREMENT THE PATTERN £ SET UP THE CONDITION COOES 
.RESULT - Z BIT SET INDICATES OVERFLOW 
INC PATTERN 

CMP tSO. PATTERN iSET UP CONDITION COOES 

RETURN sNOT EQUAL TO ZERO IS GOOD (NO OVERfi.OU) 

SETPAT: 

HIPAT: SUBTST <<SUBR ?'"T HIGHEST PATTERN TESTING TYPE>> 



i*SUBTEST 



MOV 

RETURN 



SUBR SET HIGHEST PATTERN TESTING TYPE 
*27. PATTERN tSET HIGHEST PATTERN 



INC6NK: SUBTST 
•SUBTEST 



<<SUBR INCREMENT BANK £ TEST>> 
SUBR INCREMENT BANK £ TEST 



(RESULTS RETURNED IN CONDITION CODES 
INC BANK 

CMP LASTBANK.BANK (TOO FAR? 

RETURN 



CvnjAeo nsvii j nEnORr OIAC. 
SU8R INCREMENT BANK 6 TEST 

10495 040442 



10496 
10497 
1049« 
10499 

lOSOO 
10501 



riACRO Y0S.02 rionday 07 -Oct -65 16:57 P«9« 320 
QUIT: SU8TST <<OUIT ROUTINE>» 



SEQ 0209 



UsUBTEST 



QUIT ROUTINE 



10502 


040442 


104472 




lOSOS 


040444 








040444 


012757 


040506 


10504 


040452 








040452 


005737 


002126 




040456 


001402 






040460 


004737 


037122 




040464 






10505 


040464 


C04737 


022066 


10506 


040470 


104421 




10507 


040472 


005737 


002454 


10500 


040476 


001003 




10509 


040500 


042737 


000040 


10510 


040506 


000005 




10511 


040510 


000000 




10512 









000004 



INITIALIZE ALL CSR'S 
lUNRELOCATE If NECESSARY 
J FLUSH OUT ANY OBE'S 
iTURN Off NEMGRY riANAGENENT 
jTuRN Off THE Q-BUS HAP 
jHALT 

ECCINIT (TRAP ON DOUBLE BIT ERRORS (NORMAL) 

SET4 tQUITl (TRAPS TO 4 GOTO QUITl 

nOV *QUIT1.4 
.DSABL CRF 

IF RLFLAG IS TRUE THEN ICALL UNRELOCATE 

TST RLFLAG 
BEQ LS66 

JSR PC. UNRELOCATE 

L366: : I < I ( I 

; FLUSH OUT DBE'S 
(TURN OFF MEMORY MANAGEMENT 

:IS THIS AN 11/85. 11/23-B OR 11/237 



172516 



QUITl: 



CALL MT0050 
OEENERGIZE 

TST N022BIT 

BNE QUITl 

BIC tBITS.MMRS 
RESET 
HALT 



(TURN OFF THE Q-BUS MAP 



CVMJ«BO MSVll-J MEMORY OIAG. 
QUIT ROUTINE 



10515 


040512 




10516 


040512 


004737 


10517 


040316 






040516 


005737 




040522 


001003 




040524 


005737 




040530 


001402 




040532 




10518 


040532 


000777 


10519 


040534 






040534 


000403 




040536 




10520 


040536 


000000 


10521 


040540 


000137 


10522 


040544 






040544 




10523 






10524 


040544 





MACRO Y0S.02 rionday 07 -Oct -65 16:57 Pag* 322 
EXIT: SUBTST <<HALT PROGRAn>> 



10525 
10526 
10527 
10526 
10529 
10530 



SEQ 0290 



, •SUBTEST 



HALT PROGRAM 



EXIT2: 



CALL SHUTUP 

IF APTFLAG IS TRUE OR ACTFLAG IS TRUE 



BR 
ELSE 



lEXHALT: HALT 

JMP START 
END iOF IF APTFLAG 



TST APTFLAG 
BNE L367 
TST ACTFLAG 
BEQ L370 
L367: 3 ] i ; i I 



BR L371 
L370: { ( 1 1 ( ; 



L371: i i t ! I I 



SHUTUP: SUBTST <<SWJTD0UN DIAGNOSTIC >> 
t*SUBTEST SHUTDOWN DIAGNOSTIC 



10534 


040544 


104472 




10535 


040546 








040546 


005737 


002126 




040552 


001402 






040554 


004737 


037122 




040560 






10536 


040560 








040560 


005737 


002436 




040564 


001002 




10537 


040566 


004737 


022066 


10536 


040572 
040572 






10539 


040572 


012700 


000001 


10540 


040576 


013701 


002576 


10541 


040602 


004737 


037350 


10542 


040606 


104421 




10543 


040610 


005737 


002454 


10544 


040614 


001003 




10545 


040616 


042737 


000040 172516 


10549 


040624 


000207 




10550 








10551 


040626 







INITIALIZE ALL CSR'S 

lUNRELOCATE 

; FLUSH OUT DBE'S 

i RESTORE LOADERS 

;TURN OFF MEMORY MANAGEMENT 

iUNMAP THE Q-BUS MAP 

ECCINIT :TRAP ON DOUBLE BIT ERRORS (NORMAL) 

IF RLFLAG IS TRUE THEN $CALL UNRELOCATE 



II: 



IF QUICK IS FALSE 



CALL MT0030 
END iOF IF QUICK 

MOV *1.R0 

MOV LOADHOME.Rl 

CALL BANKMOV 

0EENER6IZE 

TST N022BIT 

BNE 1) 

BIC «BirS.MMR3 

RETURN 



s FLUSH OUT DBE'S 



L372 



L373: 



TST RLFLAG 
BEQ L372 

JSR PC. UNRELOCATE 

i i : : : ( 

TST QUICK 
BNE L373 



: DESTINATION BANK 
i SOURCE BANK 

5 TURN OFF MEMORY MANAGEMENT 

;OOES THIS POP- 11 HAVE 22-BIT ADDR7 

(BRANCH IF NOT 

jTURN OFF Q-BUS MAP 



APTDOUN: SUBTST 
•SUBTEST 



<<APT SHUTDOWN SEQUENCE >> 
APT SHUTDOWN SEQUENCE 



10552 040626 
040626 



010346 



MAP 90 



:MAP SUPERVISOR SPACE (TEST AREA) TO BANK M 

MOV R3.-(SP) 



CvnjABO nsvii-j hemory oiag. 
APT SHUTOOUN SEQUENCE 
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040630 
040634 

040640 

10553 040642 
040642 

10554 040650 

10555 040656 

10556 040664 

10557 040672 



lOSSe 040674 000000 



012703 000000 

004737 035604 

012603 

053737 002552 177776 

012737 040626 060024 

012737 000340 060026 

012737 000000 120626 
104417 



SEQ 0291 



nov «0.R3 
CALL tIAPPER 
.DSASL CRF 



KERNEL 
APTHLT: HALT 



TEST AREA 

BIS TESTMOOE.PSU 

OSABL CRF 
MOV ♦APTDOUN. FIRST ^24 

MOV •340.riRST*26 
MOV •0,FIRST*APTDOUN 



: ENTER TEST MODE 



MOV (SP)».R3 



iGO TO SYSTEM TEST MODE 



t ENTER KERNEL MODE 



cvnjASO nsvii-j nenoRY diag. 

APT SHUTOOUN SEQUENCE 
10561 040676 



10562 
10563 
10564 
10565 
10566 
10567 
10S6a 
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SUBTST <<BLOCK MOVE SUBROUTINE>> 



SEQ 0292 



(♦SUBTEST 



SLOCK MOVE SUBROUTiriE 



10569 
10570 
10571 
10572 
10575 



10574 
10S7S 
10576 
10577 



10578 
10579 
10500 
10501 
10502 
1OS0S 
10504 



1056S 
10506 



040676 
040676 
040700 
040702 
040704 
040710 
040714 



010046 
010146 
010246 

012702 177640 
012701 000020 
000413 



BL0CK3 HAS 3 ARGUEMENTS 
BL0CK2 HAS 2 ARGUEMENTS 
BLOCKl HAS 1 ARGUEMENTS 



iALL ARE CALLED BY THE BMOV MACRO 
.ENABL LSB 
BLOCKl: PUSH R0.R1,R2 



MOV ♦FASTCITY,R2 
MOV #16.. Rl 
BR 3$ 



MOV RO. (SP) 
MOV Rl, (SP) 
MOV R2.-(SP) 



040716 




BL0CK2: 


PUSH 


R0,R1.R2 




040716 


C10046 








MOV 


040720 


010146 








MOV 


040722 


010246 








MOV 


040724 


012701 000020 




MOV 


«16. .Rl 




0407S0 


000404 




BR 


2« 




040732 




BLOCKS: 


PUSH 


R0.R1.R2 




040732 


010046 








MOV 


040734 


010146 








MOV 


040736 


010246 








MOV 


040740 


012501 




MOV 


(R5)».R1 




040742 


012502 


2«: 


MOV 


(R5)«.R2 




040744 


012500 


3«: 


MOV 


(R5)«.R0 




040746 


012022 


1«: 


MOV 


(R0)*.(R2) 




040750 


077102 




SOB 


Rl.l« 




040752 






POP 


R2.R1.R0 




040752 


012602 








MOV 


040754 


012601 








MOV 


040756 


012600 








MOV 


040760 


000205 




RTS 


RS 








.OSABL 


LSB 





CVMJABO tISVll-J MEMOAY OIAG. 
FIELD SERVICE NODE 

10588 
10589 

10590 040762 



10591 040762 

10592 040764 
040764 

10593 

10594 040770 
040770 
040774 
040776 
041002 
041004 

10595 041004 
041004 



10596 
10597 
10598 

10599 
10600 
10601 

10602 



10603 
10604 

10605 



041010 
041012 
041014 
041014 
041014 
041020 
041022 
041022 
041026 
041026 
041032 
041036 
041040 
041040 
041046 
041046 



10606 041052 

10607 041054 
041054 

10608 041056 

10609 041062 

10610 041064 
041064 



10611 
10612 



10613 
10614 
10615 
10616 
10617 
10618 
1C619 



041070 
041072 
041072 
041074 
041076 
041102 
041104 
041106 
041110 
041112 
041114 
041116 



104415 
104401 



005737 
001003 
005737 
001404 



066166 

002126 
002426 



104401 067627 

104416 

000207 



005757 
001402 



002544 



013746 177746 



013746 
013746 
104424 

012737 

104401 

104414 

012600 
020027 
101403 

104401 

000766 

010046 
006316 
004737 
041160 
041262 
041372 
041540 
042014 
042334 
043252 



002152 
002006 



177777 
067057 

000022 
066207 

041150 



MACRO Y05.02 Monday 07 -Oct -85 16:57 Pag* 32S 

.SBTTL FIELD SERVICE MODE 
FIELDSERVICE:SUBTST <<SUeR FIELD SERVICE COMTIANO M0DE>> 



SEQ 0293 



i*SUBTEST 



SUBR 



FIELD SERVICE COtlHANO MODE 



I' 



002006 



1>; 



FSl: 



II: 



SAVREG 
TYPE 
TYPEIT 
.DSABL 



nSG020 

.riSG020 

CRF 



(FIELD SERVICE COmAND HGOE 



IF RLFLAG IS TRUE OR NOFSMODE IS TRUE 



TYPE MSG048 
TYPEIT ,MSG046 
.DSABL CRF 

RESREG 

RETURN 
END I OF IF RLFLAG 

TST CACHKN 
BEQ 11 

PUSH CONTRL 

PUSH CSRNO, KAMIKAZE 



CACHOFF 

SET KAMIKAZE 



TYPE 
TYPEIT 
.DSABL CRF 
RDOEC 
POP 



MSG026 
.MSG026 



CMP 

BLOS 

TYPE 

TYPEIT 

.DSABL 

BR 

CASE RO 



RO 

Ro.ns. 

1) 

MSG021 
,MSG021 
CRF 
FSl 



FSCMDO 
FSCMDl 
FSCM02 
FSCM03 
FSCMD4 
FSCM05 
FSCMD6 



L374:,, 

{NOT AVAILABLE NOW - TRY LATER! 



TST 
BNE 
TST 
BEQ 
I i 



RLFLAG 
L374 

NOFSMODE 
L375 



L375: 

sSAVE CACHE STATUS 

iSAVE CSR € KAMIKAZE STATUS 

.TURN CACHE OFF 

: COMMAND: 



:READ A DECIMAL NUMBER 
:C0f«1AND --> RO 



MOV CONTRL. -CSP) 

MOV CSRNO. -(SP) 
MOV KAMIKAZE. (Sr) 



MOV 9 l.KAMTXAZE 



MOV (SP>».RO 



sEXIT FIELD SERVICE COMMANDS 

;READ CSR 

sLOAD CSR 

(EXAMINE MEMORY 

(MODIFY MEMORY 

(SELECT BANK C PATTERN 

(TYPE CONFIGURATION MAP 



MOV 
ASL 
JSR 



RO. (SP) 
«SP 

PC.L376 



CVMJABO MSVll-J MEMORY 
SUBR FIELD SERVICE i 

10620 041120 04S260 

10621 041122 043552 

10622 041124 044000 

10623 041126 044272 

10624 041130 044320 

10625 0411S2 044342 

10626 041134 044362 

10627 041136 044404 
10626 041140 044422 

10629 041142 044506 

10630 041144 044550 

10631 041146 044564 

10632 041150 
041150 

041150 062616 

041152 013646 

041154 004736 

10633 041156 000733 



01 AG. MACRO Y05. 
OMMANO MODE 



Monday 07 -Oct 85 16:57 Pag« 325 1 



SEQ 0294 



FSCM07 
FSCM08 
FSCM09 
F CMC 10 
FCMOll 
FCM012 
FCM013 
FCM014 
FCM015 
FCM016 
FCM017 
FCM018 
END jOF CASE 



SOB A-LONG TEST 

ERROR SUMMARY 

REFRESH TEST 

SET FILL COUNT 

ENTER KAMIKAZE MODE 

EXIT KAMIKAZE MODE 

TURN CACHE OFF 

TURN CACHE ON 

TEST ONLY SELECTED BANKS 

RESUME TESTING ALL BANKS 

ENABLE TRACE 

DISABLE TRACE 



LS76: 



BR 



FSl 



I i 1 1 > I 

ADO CSP)*.8SP 
MOV eCSP)»,-(SP) 
JSR PC.8(SP)* 



CVnjABO nSVli-J HEnOftY OIAG. macro Y05.02 
SUBR FIELD SERVICE COmANO nOOE 



Monday 07 -Oct -85 16:57 Pag* 327 



SEQ 0295 



10636 


041160 






10637 


041160 








041160 


104401 


070605 


10638 


041164 


062706 


000002 


10639 


cni7o 








041170 


005737 


002010 




041174 


001405 




10640 


041176 


062706 


000002 


10641 


041202 


005037 


002010 


10642 


041206 








041206 


000402 






041210 






10643 


041210 








041210 


012637 


002006 


10644 


041214 








041214 






10645 


041214 








041214 


012637 


002 1S2 


10646 


041220 


005737 


002544 


10647 


041224 


001414 




10648 


041226 








041226 


023737 


002544 




0412S4 


001003 




10649 


041236 


062706 


000002 


i06S0 


041242 








041242 


000405 






041244 






10651 


041244 


005737 


002544 


10652 


041250 


001402 




10653 


041252 








041252 


012637 


177746 


10654 


041256 








041256 






10655 


041256 


104416 




10656 


041260 


000207 




10657 








10658 


041262 







10659 041262 

10660 041266 

10661 041272 
041272 

10662 041300 

10663 041302 
041302 

10664 041310 

10665 041312 
041312 
041320 
041326 



004737 
010637 

012737 

104426 

012737 
104026 

012737 
022737 
001002 



FSCMOO: SUBTST <<COMnANO 0 

'(•SUBTEST COMMAND 0 

* TYPE MSG103 

TYPEIT .MSG103 

.DSABL CRF 

ADO «2.SP 
IF SKIPKAMI IS TRUE 



ADO 
CLR 
ELSE 



♦2.SP 
SKIPKAMI 



002S50 



POP KAMIKAZE 

END tOF IF SKIPKAMI 

POP CSRNO 

TST CACHKN 

BEQ RESO 

IF CACHKN EQ CACHKF 



ADO 
ELSE 



TST 
BEQ 
POP 



«2.SP 



CACHKN 

RESO 

CONTRL 



END I OF IF CACHKN 



RESO: 



RESREG 
RETURN 



EXIT>> 
EXIT 

I LEAVING FIELD SERVICE MODE 



TST SKIPKAMI 
BEQ L377 
, THROW AUAY OLD KAMIKAZE FLAG 



BR L400 

L377: I i I i i I 
(RESTORE OLD KAMIKAZE FLAG 

MOV (SP)». KAMIKAZE 

L400: 1 : > i ( I 

MOV (SP)*. CSRNO 



044576 

002306 

041336 000004 



177777 002430 



034002 
000005 



000004 
004064 



FSCMDl: SUBTST 

!*SUBTEST 

' CALL 
MOV 
SET4 
MOV 
. DSABL 
REAOCSR 
SET 

ERROR 

RES4 

MOV 

CMP 

BNE 



<<FS 
FS 



COMMAND 1 
COMMAND 1 



UHICHCSR 

SP.FSSTACK 

«RES1 

MES1.4 

CRF 

NOERROR 
»26 

«TIME0UT.4 

♦S.PRGTYP 

101* 



(IF CACHE IS OFF 



(THROU AUAY CACHE STATUS 



CMP CACHKN. CACHKF 
BNE L401 



L401 



BR L402 

( i : ( ( : 



(RESTORE CACHE STATUS 



MOV (SP)*. CONTRL 
L402: ::::(: 



READ CSR>> 
READ CSR 



(TRAPS TO 4 GOTO RESl 



(USE ERROR ROUTINE FOR PRINTOUT 
(RESET TRAPS TO 4 TO DEFAULT 

(IS THIS AN 11/83/84 ? 
(BRANCH IF NOT 



MOV •-I. NOERROR 



CVMJA80 MSVll-J MEMWY OIAC. MACRO Y05.02 
rs COMMAND 1 READ CSR 



Monday 07 -Oct 85 16:57 Pmg* 327-1 



041330 005037 177766 
041334 



10667 041336 
041336 

10666 041342 

10669 041346 
041346 
041354 
041362 
041364 
041370 

10670 041370 000207 



1011: 



CLR 



CPUERR 









.OSABL 


CRF 


000207 






RETURN 






RESl: 


TYPE 


MSG025 


104401 


067033 




TYPEIT 


.MSG025 






.OSABL 


CRF 


013706 


002306 




MOV 


FSSTACK.SP 






RES4 




012737 


034002 


000004 


MOV 


♦TIMEOUT. 4 


022737 


000005 


004064 


CMP 


•5.PR0TYP 


001002 






BNE 


1011 


005037 


177766 




CLR 


CPUERR 



1011: 



.OSABL 
RETURN 



CRF 



» CLEAR OUT THE CPU ERROR REGISTER BITS 
jTHAT A EXPECTED TRAP COULD HAVE SET 

(THIS CSR DOES NOT EXIST 

(RESET TRAPS TO 4 TO DEFAULT 

,IS THIS AN 11/83/84 ? 
(BRANCH IF NOT 

(CLEAR OUT THE CPU ERROR REGISTER BITS 
(THAT A EXPECTED TRAP COULD HAVE SET 



SEQ 0296 



CvnjASO nsvii-j mehory 
FS corvMNO 1 



OIAG. MACRO Y0S.02 nontfay 07 -Oct -85 16:57 P< 
REM) CSR 



329 



SeO 0297 



10673 


041372 








FSCM02: 


SUBTST 


<<FS COMMAND 


2 LOAD CSR>> 












■•SUBTEST 


FS COMMAND 


2 LOAD CSR 


10674 


041372 


004737 


044576 






CALL 


UHICHCSR 




10675 


041376 


010637 


002306 






MOV 


SP.FSSTACK 




10676 


041402 










SET4 


•(tES2 


1 TRAPS TO 4 GOTO RES2 




041402 


012737 


041504 


000004 




MOV 


4RES2.4 
















.0SA8L 


CRF 




10677 


041410 


104426 








REAOCSR 






10676 


041412 












nSG027 




041412 


104401 


067071 






TYPEIT 


,MSG027 
















.OSABL 


CRF 




10679 


041416 










SET 


NOERROR 






041416 


012737 


177777 


002430 








MOV t-l. NOERROR 


106«0 


041424 


104026 








ERROR 


*26 


iliSE ERROR ROUTINE FOR PRINTOUT 


10661 


041426 










RES4 




(RESET TRAPS TO 4 TO DEFAULT 


041426 


012737 


034002 


000004 




MOV 


♦TIMEOUT. 4 






0414S4 


022737 


000005 


004064 




CMP 


♦5.PR0TYP 


,IS THIS AN 11/63/84 ? 




041442 


C01002 








BNE 


1011 


t BRANCH IF NOT 




041444 


005037 


177766 






CLR 


CPUERR 


1 CLEAR OUT THE CPU ERROR REGISTER BITS 




041450 








1011: 









10682 041450 
041450 

10683 041454 

10684 041456 
041456 

10685 041462 

10686 041464 

10687 041466 
041466 

10688 041472 
041472 

10689 041500 

10690 041502 

10691 041504 
041504 

10692 041510 

10693 041514 
041514 
041522 
041530 
041532 
041536 



10694 041536 











.OSABL 


CRF 










TYPE 


MSG023 


104401 


067017 






TYPEIT 


.MSG02S 










.DSA6L 


CRF 


104413 








RDOCT 












POP 


CSR 


012637 


002150 










104425 








LOADCSR 




104426 








REAOCSR 












TYPE 


MSG026 


104401 


067106 






TYPEIT 


.MSG028 










.DSABL 


CRF 










SET 


NOERROR 


012737 


177777 


002430 








104026 








ERROR 


»26 


000207 








RETURN 










RES2: 


TYPE 


nS6025 


104401 


067033 






TYPEIT 


,MSG025 










.DSABL 


CRF 


013706 


002306 






MOV 


FSSTACK.SP 










RES4 




012737 


034002 


000004 




MOV 


•TIMEOUT. 4 


022737 


000005 


004064 




CMP 


♦S.PROTYP 


001002 








BNE 


1011 


005037 


177766 






CLR 


CPUERR 








101* : 














.OSABL 


CRF 


000207 








RETURN 





iTHAT A EXPECTED TRAP COULD HAVE SET 
sFIRST CSR UORO 



:READ AN OCTAL NUMBER 
(PUT IN IN LOC "CSR" 



tUSE FOR PRINTOUT - NOT AN ERROR 
iTHIS CSR DOES NOT EXIST 

t RESET TRAPS TO 4 TO DEFAULT 

lis THIS AN 11/83/84 ? 
I BRANCH IF NOT 

(CLEAR OUT THE CPU ERROR REGISTER BITS 
(THAT A EXPECTED TRAP COULD HAVE SET 



MOV {SP)».CSR 



MOV • 1. NOERROR 



CVnjAaO nsvil J rCnORY OIAG. riACRO Y05.02 
FS COVIANO 2 LOAD CSIt 



Monday 07-0ct-S5 16:57 Pmga SSI 



SCQ 0296 



10697 


041540 






10696 


041540 








041540 


013746 


002102 




041544 


013746 


002076 




041550 


013746 


002504 




041554 


013746 


QQQOQ^ 


10699 


C41560 


012797 


000002 


10700 


041566 








041566 


104401 


067122 


10701 


041572 








041572 


104401 


0o7X61 


10702 


A^ t 

041376 


4 AA A 4 V 

104413 




10703 


A^ 1 AAA 

041o00 


A4 VYVY 


05o21o 


10704 


041606 








AA 4 M^fkM. 


At 4Ay\A 




10705 


t%A 4 A 1 A 

041610 






10706 


i%A 4^4^ 

041612 


iW\A4 

0W6100 




10707 


A^ 9 ^% A 

041614 


iW%A4 VY 

006137 


^ yclOZ 


1O7O0 


041D2V 


WUc41 




10709 


AA 4 A 44 


OwtAWO 




« A^ 4 A 

10710 




029 '3 r 


AA<^4 A9 


10711 


0416S2 


OOSS57 




10712 


041654 


062700 


060000 


% AY « V 

10719 


AA 4 A 4 /\ 


032700 


AAAAAl 


1 A Y 4 d 

10714 


AA 4 M^AA 

041644 


AA4 

001932 




10717 


AA 4 AAA 

041646 


OcOOc ' 




10716 


041652 


101547 




10717 


041654 


0127S7 


041726 


1071V 


V4160« 








4 A^ 4 

V4166c 


A< 


AA 1 


10719 


041670 








041670 


A 4 A YA A 

010946 






041672 


013 '09 


AA9t A3 




041676 


Wv4 73 f 


A««A AA 

W39eV4 




041702 


At ^AAV 
V12DV3 




10720 


041704 








041704 


05S7S7 


002552 


10721 


041712 


OlXOvX 




10722 041714 






1072S 041716 








041716 








041720 


104403 






041722 


006 






041723 


000 




10724 


041724 


000410 




10725 








10726 


041726 








041726 


104401 


067221 



FSCMOS: SUBTST <<FS 



I" 



••SUBTEST 



FS 



COMTMNO S 
COmMO S 



EXM1ZNE rcnofiY>> 

EXM1INE NEHOIIY 



PUSH 



BANK . NOPM . P AftTHERE . 4 



002076 



11: 



002102 



002556 



002304 
000004 



177776 



SI: 



MOW 








TVPFTT 






CRF 


TYPE 


MSSOSl 


TYPFTT 


MSCOSl 
4 nsw^A 


DSABL 


CRF 


BIMTT 
vti/w ' 




HOW 
ri4jT 


IHXOCT BANK 


POP 


RO 


CLC 






RO 


ROL 

V9Wb 


BANK 


CLC 




ROR 


RO 


CMP 


BANK.LASTBANK 


BGT 


11 


ADD 


«FIRST,RO 


BIT 


4BXT0.R0 


BNE 


11 


CMP 


RO.M.AST 


BHI 


11 


MOV 


*S». PARTNERS 


SET4 


«4I 


MOV 


«4«.4 


.DSABL 


CRF 


MAP 


BANK 


MOV 


BANK.RS 


CALL 


MAPPER 


. DSABL 


CRF 


TESTAREA 


BIS 


TESTMOOE.PSU 


.OSABL 


CRF 


MOV 


(RO).Rl 


KERNEL 




TVPOCS 


Rl 


MOV 


Rl.-(SP) 


TYPOS 


.BYTE 


6 


,BYTC 


0 


.OSABL 


CRF 


BR 


EXCNDS 


TYPE 


NSG0S2 


TYPCIT 


.NSG0S2 



I INDICATE PARITY ACTION 
{EXAMINE MEMORY 



MOV BANK.-(SP) 
MOV N0PAA.-($P) 
MOV PARTMERC.-(SP) 
MOV 4.-(SP) 



iPHYSICAL ADDRESS (0-1777S776)?? 



{READ OCTAL NUMBER ONTO STAO( t 
iPUT MSB'S IN BANK 
iPUT LSB'S IN RO 



•NIKT 



MOV (SP)*.RO 



I CHECK FOR BANK 
(BRANCH IF TRUE 



TOO HIGH 



I CHECK FOR ODD ADDRESS 
(BRANCH IF ODD ADDRESS 
(CHECK FOR ADDRESS OVER 16K 
(BRANCH IF OVER 16K 
(INCASE OF ABORTS 
(TRAPS TO 4 GOTO 41 



(MAP SUPERVISOR SPACE 



(ENTER TEST MODE 



(TEST AREA) TO 
MOV RS.-(SP) 



MOV (SP)..R3 



BAM 



(GO TO SYSTEM TEST MODE 



(ENTER KERNEL MODE 

((SAVE Rl FOR TYPEOUT 
((GO TYPE -OCTAL ASCII 
II TYPE 6 DIGITS 
( (SUPPRESS LEADING ZEROS 



iPARITY ABORT 



CVMJA80 MSVll-J MEMORY DIAG. MACRO t05.02 
fS COMMAND 5 EXAMINE MEMORY 



41; 



Monday 07-0ct-85 16:57 Pag* 531-1 



SEQ OkVt 



10727 


041732 


000405 






1072S 










10729 


041734 


062706 


000004 




10730 


041740 








041740 


104401 


067240 




10731 


041744 


000400 






10732 










10733 


041746 


104417 






10734 


041750 








041750 


0126^7 


000004 






041754 


0126S7 


002S04 






041760 


012637 


002076 










UVclwc 




10735 


041770 










041770 


012737 


034002 


000004 




041776 


022737 


000005 


004064 




042004 


001002 








042006 


C05037 


177766 






042012 








10736 


042012 


000207 







.DSABL CRF 

BR EXCM03 

ADD M.SP 

TYPE MSG033 

TYPE IT .MSGOSS 

.DSABL CRr 

BR EXCMOS 



EXCMDS : 



1011 1 



KERNEL 
POP 



RES4 

MOV 
CMP 
BNE 
CLR 



jFIX STACK 
J TIMEOUT TRAP 



(ENTER KERNEL MODE 
4 , PAR THERE . NOPAR . BANK 



♦TIMEOUT. 4 
•5.PR0TYP 
1011 
CPUERR 



RESET TRAPS TO 4 TO DEFAULT 



MOV (SP)*.4 
MOV (SP)..PARTH€RE 
MOV (SP)*. NOPAR 
MOV (SP)*.BANK 



.DSABL CRF 
RETURN 



;IS THIS AN 11/S3/S4 7 
(BRANCH IF NOT 

(CLEAR OUT THE CPU ERROR REGISTER BITS 
(THAT A EXPECTED TRAP COULD HAVE SET 



CVfiJASO "SVii J nenoRr 
rs COMMAND 5 



DIAC. 
EXAMINE 



MACRO r05.02 Monday 07 Oct AS 16:57 Page SSS 
MEflORT 



SEQ 0500 



10739 


042014 






10740 


042014 








042014 


015746 


002102 












042024 


015746 


002504 




042050 


015746 


000004 


10741 


042054 


012757 


000005 


10742 


042042 








042042 


104401 


067546 


10743 


042046 








042046 


104401 


067161 


10744 


042052 


104415 




10745 


042054 


015757 


056216 


10746 


042062 








042062 


C 12600 




10747 


042064 


000241 




10748 


042066 


006100 




10749 


042070 


006157 


002102 


10750 


042074 


000241 




10751 


042076 


006000 




10752 


042100 






042100 


025757 


002102 




042106 


005SS7 




10755 


042110 


062700 


060000 


107S4 


A49I 14 








042114 


052700 


000001 




042120 


001552 




10755 


042122 








042122 


020027 


157776 










10756 


042150 


012757 


042176 


10757 


0421S6 








0421S6 


012757 


042204 


XV ' 


A49144 








042144 


010546 






042146 


015705 


002102 




042152 


004757 


055604 




042156 


012605 




10759 


042160 


104511 




10760 


042162 








042162 


055757 


002552 


10761 


042170 


011001 




10762 








10763 


042172 


104417 




10764 


042174 


000410 




10765 








10766 


042176 








042176 


104401 


067221 



FSCM04: SU8TST ccFS 
•SUBTEST 

PUSH 



002076 



II: 



002102 



002556 



002504 
000004 



177776 



51: 



COTttMNO 4 
FS COHMANO 4 

BANK . NOP AR . PARTHERE . 4 



NOOIFY HENORY 



nOV BAI«(.-(SP) 
nOV NOPAR. (SP) 
nOV PARTHERE, (SP) 
MOV 4. (SP) 



MOV 


•5.N0PAR 


{INDICATE PARITY ACTION 


TYPE 


MSG056 


jMODIFY MEMORY 


TYPEIT 


,MSG056 




.0SA8L 


CRF 




TYPE 


nSGOSl 


1 PHYSICAL ADDRESS (0 17775776)77 


TYPEIT 


.nSG051 




.DSABL 


CRF- 




RDOCT 




{HEAD OCTAL NUMBER ONTO STACK C IHIOCT 


MOV 


IHIOCT.BANK 


sPUT MSB'S IN BANK 


POP 


RO 


:PUT LSB'S IN RO 






MOV (SP)*.RO 


CLC 






ROL 


RO 




ROL 


BANK 




CLC 






ROR 


RO 




IF BANK 


GT LASTBANK 


THEN GOTO It iCHCCK FQR BANK TOO HIGH 






CMP BANK. LASTBANK 






BGT It 


ADD 


•FIRST. RO 




MI TO SET. IN RO 


THEN GOTO It : CHECK FOR ODD ADDRESS 



IF RO h: VLAST THEN GOTO It 



MOV 



SET4 Mt 



•5t.PARTHCRE 



MOV 



•41.4 



.dsabl car 



MAP 

MOV 
CALL 



BANK 

BANK.RS 
MAPPER 



BIT •BITO.RO 
6NE It 

: CHECK FOR ADDRESS OVER 16K 

CMP RO.^LAST 
BHI It 

: INCASE OF ABORTS 
TRAPS TO 4 GOTO 4t 



:MAP SUPERVISOR SPACE (TEST AREA) TO BANK 

fWV R5. (SP) 



s ENTER TEST MODE 



.DSABL CRF 

INVALIDATE 
TESTAREA 

BIS TESTMODE.PSU 
.DSABL CRF 
MOV (R0},R1 

(GETTING HERE MEANS UE GOT LUCKY - NO TRAPS 
KERNEL i ENTER KERNEL MODE 

BR SI 



MOV (SP)..R3 



}G0 TO SYSTEM TEST MODE 



TYPE MSG052 
TYPEIT .MSG052 
.DSABL CRF 



:PARITr ABORT 



s 


MSVll J 




0I4G . 


MACRO 


COnnANO 


4 


nooif 1 




1076 7 


042202 


000431 






10768 










1076<» 


042204 


062706 


000004 




10770 


042210 










042210 


104401 


067240 




10771 


042214 


000424 






10772 










107 73 


042216 










042216 


104401 


067365 




10774 


042222 










042222 


010146 








042224 


104403 








042226 


006 








042227 


000 






10775 


042230 










042230 


104401 


067422 




10776 


042234 


104413 






10777 


042236 










042236 


012o0l 






10778 


042240 










042240 


053737 


002552 


177776 


10779 


042246 


010110 






10780 


042250 


011001 






10781 


042252 


104417 






10782 


042254 










042254 


104401 


067404 




1078S 


042260 










042260 


010146 








047262 


4 i\A AAV 

104403 








042264 


006 








042265 


000 






10784 










10705 


042266 


104417 






10706 


042270 










042270 


012637 


AAA A 

000004 






042274 


012637 


002304 






042300 


012637 


002076 






042304 


012637 


002102 




lU r B ' 












042310 


012737 


034002 


000004 




042316 


022737 


000005 


004064 




042324 


001002 








042326 


005037 


177766 






042SS2 









4t : 



5«: 



EXCM04 



101«; 



10700 042332 



000207 



ooday 07 Oct-85 16:57 P 



333 1 



SEQ 0301 



on 
ON 




- c y T T 


Ann 
ADO 


CD 




TYPE 


AV V 

n5U035 




T TPEIT 


,li5G033 




. OSABL 


CRF 




BR 


txcnD4 


. C V T T 


T TPfc 




. m n nATA uac 
; ULU 1 n Wn3 


TTPtIT 


, M5(j03 7 




r\c AAl 
. OsWL 


CRr 




TTrOCb 


ot 
Rl 


.DDT4JT TT 


nuv 


D t f CO ^ 


• • c AuP D1 rno TvDpmiT 

• t S^VC r UH ITKcUUI 


TYPOS 




s sGO TfPE- -OCTAL ASCII 


.BYTE 


6 


: J TYPE 6 DIGITS 


.BYTE 


0 




. OSABL 


CRF 




TYPE 


MSG039 


. TMDllT MTU DATA 


TYPEIT 


.MSG039 




OSABL 


CRF 




ROOCT 




. or An niki nr t ai mi mrpd 


POP 


Rl 


*nrT IkiPu lOiiMQPD 
« 1 ricw niunDcn 


TESTAREA 




BIS 


TESTMOOE.PSU 


. fin Tn QYQTPN 


.DSABL 


CRF 




nov 


Rl.CRO) 


.PUT TT TM MFNCIAY 


MOV 


(RO).Rl 


tOCAn TT AflATM 


KERNEL 




TYPE 


MSG038 


:DATA IS NOW 


TYPEIT 


.MSG036 




.DSABL 


CRF 




TYPOCS 


Rl 


■PRINT IT 


MOV 


Rl.-(SP) 


i :SAVE Rl FOR TYPEOUT 


TYPOS 




;:G0 TYPE -OCTAL ASCII 


.BYTE 


6 


sjTYPE 6 DIGITS 


.BYTE 


0 


: (SUPPRESS LEADING ZEROS 


.DSABL 


CRF 




KERNEL 




I ENTER KERNEu MODE 


POP 


4 . PARTHERE , NOPAR . BANK 



nov csP}*.Ri 



RES4 

nov 

CMP 
BNE 
CLR 



.DSABL 
RETURN 



♦TIMEOUT. 4 
♦5.PR0TYP 
101* 
CPUERR 



CRF 



J RESET TRAPS TO 4 TO DEFAULT 



MOV {SP)».4 
MOV (SP)». PARTHERE 
MOV (SP)». NOPAR 
MOV (5P)*.BANK 



J IS THIS AN 11/83/84 ? 
; BRANCH IF NOT 

; CLEAR OUT THE CPU ERROR REGISTER BITS 
:THAT A EXPECTED TRAP COULD HAVE SET 



vnjABO 


MSVll J 


nENORr 


DIAG. 


& 


COmANO 


4 


nOOIFY 


10791 


042SS4 






10792 


042SS4 








042554 


013746 


002102 




042S40 


013746 


002112 




042S44 


013746 


002412 




042320 


013 f 


f\^0%OA 




042354 


013746 


000060 




042360 


013746 


000062 


107^3 


04e30* 






10794 


042370 








042370 


104401 


067444 


10795 


042374 








042374 


104401 


067142 


10796 


042400 


104413 




10797 


042402 








042402 


0126S7 


002102 


10798 


042406 








042406 


023737 


002102 




042414 


003367 




10799 








10000 


042416 


013701 


002102 


10991 


042422 


006301 












1080S 


042426 








042426 


033761 


002106 




042434 


001003 




10604 


042436 








042436 


104401 


067470 


loaos 


042442 














10606 


042444 








042444 






10607 








10606 


042444 








042444 


104401 


067515 


10609 


042450 


104413 




lOUlO 


042452 








042452 


012637 


002112 


10611 


042456 








042456 


023727 


002112 










10612 


042466 








042466 


005737 


002112 




042472 


001004 




10813 


042474 








042474 


104401 


067533 


10614 


042500 


104413 




10615 


042502 








042502 


012602 
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SEQ 0302 



rsCM05: SUBTST *<FS 



COmANO 5 



SELECT BANK £ PATTERN) > 



{•SUBTEST FS COHHANO 5 SELECT BANK £ PATTERN 

' PUSH BANK.PATTERN.TESTA00.PCBUnP.TKVEC.TKVEC*2 



It: 



002556 



002664 



2t: 



000047 



nOV BANK.-(SP) 
flOV PATTERN. (SP) 
MOV TESTAOO. (SP) 
MOV PCBUMP. '^SP) 
MOV TKVEC.-(SP) 
MOV TKVEC»2.-(SP) 
:SAVE LAST GOOD STACK POINTER 
{SELECT BANK £ PATTERN TEST 



:8ANK(0-177)? 



MOV SP.FSSTACK 
TYPE MSG040 
TYPEIT .MSG040 
.DSABL CRF 
TYPE MSG030 
TYPEIT .MSG030 
.DSABL CRF 

ROOCT :REAO AN OCTAL NUMBER ONTO THE STACK 

POP BANK :PUT IT IN BANK 

MOV (SP)*.BANK 

IF BANK GT LASTBANK THEN GOTO II s CHECK FOR BANK TOO HIGH 

CMP BANK.LASTBANK 



MOV BANK.Rl 
ASL Rl 
ASL Rl 

IF CPUBIT OFF. IN CONFIG(Rl) 



TYPE MSG041 
TYPEIT .MSG041 
. OSABL CRF 

GOTO It 



:BANK NOT ACCESSABLE 



BGT It 



BIT CPUBIT. CONFIG(Rl) 
BNE L403 



END jOF IF 



BR It 



L403: 



TYPE 
TYPEIT 
.OSABL 
ROOCT 
POP 



MSG042 

.MSG042 

CRF 



PATTERN 

IF PATTERN GT *47 THEN GOTO 2t 
IF PATTERN EQ «0 



TYPE MSG043 
TYPEIT .MSG043 
.OSABL CRF 

ROOCT 

POP R2 



iPATTERN( 0-45)7 



{READ AN OCTAL NUMBER ONTO THE STACK 
jPUT IT IN PATTERN 

MOV (SP)*. PATTERN 
{CHECK FOR PATTERN TO HIGH 

CMP PATTtRN.«47 
BGT 2t 



{PATTERN 0 DATA IS? 



TST PATTERN 
BNE L404 



{READ AN OCTAL NUMBER ONTO THE STACK 
{PUT IT IN R2 

MOV (SP)*.R2 



CVMJA80 MSVH J 
FS COMnANO 

10616 042504 
042504 

10817 
10618 

10619 042504 
042304 
042506 
042512 

042516 

10620 042520 

10621 042522 

10622 042526 
042526 
042532 

10623 042534 
042534 

10824 042540 

10625 042544 
042544 

10626 042544 
042544 



10827 
10826 
10629 
10830 
10831 
10832 
10833 
10834 
10835 
10836 
10837 
10838 
10839 
10840 
10841 
10642 



10843 
10644 
10645 
10646 
10647 
10648 
10649 
10850 



10851 
10652 



042550 
042556 
042562 
042566 
042572 
042576 
042602 
042604 
042610 
042616 
042624 
042630 
042636 



042644 
042644 
042652 
042660 
042664 
042666 
042670 
042674 
042700 
042706 
042714 
042714 
042722 
042724 
042730 
042730 
042732 
042736 



nEHORY OIAG. MACRO Y05.02 rionday 07 -Oct -65 16:57 
5 SELECT BANK C PATTERN 

END lOF IF 



Pag* 335-1 



SEQ 0303 



010346 
013703 
004737 

012603 
104511 
004737 

005737 
001404 

104401 

000137 



013737 
013702 
072227 
016203 
072327 
042703 
006303 
010337 
012737 
012737 
017700 
042737 
052777 



012737 
012737 
013701 
006301 
006301 
005037 
005037 
012737 
012737 

032761 
001413 
005237 

010346 
013703 
004737 



002102 
035604 



037760 
002124 

067667 
043154 



104401 067555 



002152 
002102 
000002 
002664 
177770 
177760 

002152 
043154 
000340 
140014 

000200 
000100 



177777 
177777 
002102 



002240 
002264 
060000 
Ot>0002 



002154 



000060 
000062 

177776 
137776 



002612 
002110 



002412 
002414 



L404 : 1 1 1 1 1 



MAP 



BANK 



Cn05B: 



010000 002666 
002240 



002102 
035604 



nOV BANK,R3 
CALL MAPPER 
.OSABL CRF 

INVALIDATE 
CALL EXBANK 
IF RRFLAG IS TRUE 



TYPE MSG049 

TYPEIT .nSG049 

.OSABL CRF 

JMP CM05C 

ENO J OF IF RRFLAG 

TYPE MSG046 

TYPEIT .nSG046 

.OSABL CRF 

nOV CSRNO.SAVCSR 

nOV BANK.R2 

ASH •2.R2 

nOV C0NFIG(R2).R3 

ASH «-10.R3 

BIC ♦tC17.R3 

ASL R3 

nOV R3.CSRN0 

MOV ♦CM05C . TKVEC 

MOV ♦340. TKVEC 2 

MOV 8ITKB.ro 

BIC ♦BIT7.PSU 

BIS «BIT6.0«TKS 



SET HEADER. nUT 



MOV BANK.Rl 

ASL Rl 

ASL Rl 

CLR SPLTCSR 

CLR PASFLG 

MOV #FIRST.TESTADD 

MOV #FIRST»2.TESTA0D»2 

IF «6IT12 SET. IN C0NFI6»2(m) 



{MAP SUPERVISOR SPACE (TEST AREA) TO BANK 

MOV R3.-(SP) 



MOV (SP)*.R3 



iSET NEW MARGINS 



TST RRFLAG 
BEQ L405 
:BANK REQUIRES RELOCATION 



L405::!sjj! 



:T0 ESCAPE TYPE ANY KEY! 



:SAVE OLD CSR NUMBER 

IgENERATE INDEX INTO CONFIGURATION TABLE 
R3 - LOU WORD OF CONFIGURATION TABLE FOR THIS BANK 
POSITION CSR CODE IN BITS 0-3 
CLEAR ALL BUT THE CSR CODE 
ADJUST CSR NUMBER 



KILL ANY OLD INTERRUPT 
LOUER CPU PRIORITY TO 140 
ENABLE KEYBOARD INTERRUPTS 



MOV 0-1. HEADER 
MOV ♦-l.MUT 



INC 
MAP 

MOV 
CALL 



SPLTCSR 
BANK 

BANK.R3 
MAPPER 



BIT «6IT12.C0NFIG*2(R1} 
BEQ L406 



MOV R3. CSP) 



CVnjABO nSVll-J riEnORY DIAG. macro Y05.02 Monday 07-0ct-85 16:57 
rS COrmANO 5 SELECT BANK £ PATTERN 

.DSABL CRr 
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SEO OSOA 





042742 


012603 




10653 
10654 


042744 


012737 


120000 


042752 
042752 






10055 


042752 








042752 


032777 


000001 




042760 


001402 




10656 


042762 


104470 




10657 


042764 
042764 
042766 


000405 




10656 


042766 








042766 


013746 


002152 


10659 


042772 


104502 




10660 


042774 








042774 


012637 


002152 


10661 


043000 
043000 






10662 


043000 


C12737 


000002 


10663 


043006 


012737 


000002 


10664 


043014 


013700 


002112 


10665 


043020 


006300 




10666 


043022 


004770 


043034 


10667 


043026 


005037 


002076 


10666 


043032 


000712 




10669 








10670 


043034 


017376 




10671 


043036 


017432 




10872 


043040 


017526 




10673 


043042 


017642 




10674 


043044 


017756 




10675 


043046 


020026 




10676 


043050 


020110 




10677 


043052 


020144 




10676 


043054 


020206 




10679 


043056 


024106 




10660 


043060 


024106 




10661 


043062 


024106 




10662 


043064 


020242 




10663 


043066 


024106 




10664 


043070 


024106 




10665 


043072 


020322 




10686 


043074 


020344 




10887 


045076 


020424 




10888 


043100 


020714 




10869 


043102 


020746 




10890 


043104 


021012 




10891 


043106 


024106 




10892 


043110 


021220 




10893 


043112 


021476 




10894 


043114 


022066 




10895 


043116 


022342 




10696 


043120 


022532 




10697 


043122 


023046 




10898 


043124 


023234 




10899 


043126 


023334 





nOV •120000. TEST ADD *2 
ENOi OF IF •BIT12 

IF •SUO SET. IN 8SUR 



ECCDIS 
ELSE 



PUSH CSRNO 

CLRCSR 

POP CSRNO 



MOV (SP)».R3 



L406 : 1 1 : > 1 1 

BIT *SU0,8SUR 
BEQ L407 

s DISABLE ERROR CORRECTION 

BR L410 
L407: 1 : 1 1 1 1 



i CLEAR CSRS 



END tOF IF 



MOV 

MOV 

MOV 

ASL 

CALL 

CLR 

BR 



«2.N0PAR 
♦2.PCBUMP 
PATTERN. RO 
RO 

aFSPAT(RO) 

NOPAR 

CM05B 



MOV CSRNO. -(SP) 

MOV (SP)*. CSRNO 
L410: ; i i i s : 



{PARITY ACTION 
: TRAPS ADD 2 TO PC 



{LOOP TILL KEYBOARD INTERRUPT 



FSPAT: MTOOOO 


j<l 


SEC 


DATA PATTERN TEST 


MTOOOl 


><1 


SEC 


ADDRESS TEST 


MT0002 
MT0003 


><1 


SEC 


COMPLEMENT ADDRESS TEST 


t 1 


SEC 


3 XOR 9 WORST CASE NOISE TEST 


MT0004 


: 1 


SEC 


ROTATING ZEROS TEST 


MT0005 


i 1 


SEC 


ROTATING ONES TEST 


MT0006 


»<1 


SEC 


INITIAL DATA TEST 


MT0007 


t<l 


SEC 


ADDRESS BIT TEST 


MTOOlO 


;<1 


SEC 


BYTE ADDRESSING TEST 


MT0999 


»<1 


SEC 


NULL TEST TO KEEP TABLE ORDER 


MT0999 


J<1 


SEC 


NULL TEST TO KEEP TABLE ORDER 


MT0999 


I<1 


SEC 


NULL TEST TO KEEP TABLE ORDER 


MT0014 


1 1 


SEC 


BASIC DOUBLE BIT ERROR TEST 


MT0999 


J<1 


SEC 


NULL TEST TO KEEP TABLE ORDER 


MT0999 


8<1 


SEC 


NULL TEST TO KEEP TABLE ORDER 


MT0017 


I<1 


SEC 


HOLDING I'S £ O'S TEST 


MT0020 


: 1 


SEC 


SYNDROMES 70 CSR ON SBE TEST 


MT0021 


i 1 


SEC 


MARCHING O'S £ I'S TEST 


MT0022 


>10 


SEC 


REFRESH £ SHIFTING DIAGONAL TEST 


MT0023 


.10 


SEC 


SHIFTING DIAGONAL TEST 


MT0024 


t20 


SEC 


FAST GALLOPING PATTERN TEST 


MT0999 


;<1 


SEC 


NULL TEST TO KEEP TABLE ORDER 


MT0026 


i<i. 


SEC 


RANDOM DATA TEST 


MT0027 


I 1 


SEC 


UNIQUE BANK TEST 


HT0030 


t 1 


SEC 


FLUSH OUT DBE'S TEST 


MT0031 


; 3 


SEC 


SOB-A-LONG TEST 


MT0032 


J<1 


SEC 


WRITE RECOVERY TEST 


MT00S3 


iS5 


SEC 


BRANCH GOBBLE TEST 


MT00S4 


i 1 


SEC 


SOFT ERROR TEST 


MT00S5 


i<l 


SEC 


WORST CASE NOISE PARITY TEST 



CVnjABO nsvil-J riEnORY OIAG. macro Y05.02 Monday 07-0ct-85 16:57 
fS COMhANO 5 SELECT BANK £ PATTERN 



10900 
10901 
10902 
1090S 
10904 
10905 
10906 
10907 
10900 
10909 
10910 
10911 
10912 
10913 



10914 
1091S 



10916 
10917 



043130 
043132 
043134 
C43136 
043140 
043142 
043144 
043146 
043150 
043152 

043154 
043160 
043166 
043166 
043172 
043176 
043202 
043202 
043206 
043212 
043212 
043216 
043222 
043222 
043224 
043230 



043234 
10916 043236 

10919 043242 

10920 043250 



023446 
023510 
024106 
023546 
023626 
023662 
023712 
023772 
024022 
024052 

013706 
042777 

012637 
012637 
117700 

012637 
C12637 

012637 
012637 

010346 
013703 
004737 

012603 
004737 
013737 
000207 



002306 CnD5C : 

000100 137454 

000062 
000060 
137442 

002326 
002412 

002112 
002102 



002102 
035604 



037760 

002154 002152 



MT0036 
MT0037 
MT0999 
MT0041 
m0042 
MT0043 
nT0044 
riT0045 
MT0046 
MT0047 

MOV 
BIC 
POP 



MOVB 
POP 



POP 



HAP 

MOV 

CALL 

.OSABL 

CALL 
MOV 

RETURN 



1 SEC 
<1 SEC 
<1 SEC 
1 SEC 
<1 SEC 
1 SEC 
5 SEC 
1 SEC 
1 SEC 
<1 SEC 



FSSTACK.SP 

«BIT6,S)TKS 

TKVEC*2.TKVEC 



S$ tk6.ro 

PCBUMP.TESTAOO 



PATTERN. BANK 



BANK 

BANK.R3 

MAPPER 

CRF 

EXBANK 
SAVCSR.CSRNO 
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CORRECTION CODE TEST 

ECC DISABLE TEST 

NULL TEST TO KEEP TABLE ORDER 

ADDRESS TO CSR ON DOUBLE BIT ERROR TEST 

EXTENDED Q-BUS ADDRESS TEST 

WRITE BYTE CLEARS SBE TEST 

SHIFTING 1/0' S THROUGH THE CHECK BITS 

SYNDROMES TO CSR ON OBE TEST 

CHECK SINGLE BIT ERROR UITH ECC DISABLED TEST 

NO CSR UPDATE UITH SBE ON DBE TEST 

jRECOVER OLD STACK POINTER 



SEQ 0305 



MOV (SP)».TKVEC.2 
MOV <SP)».TKVEC 
sGET CHARACTER TO GET RIO OF FLAG 

MOV (SP)*.PCBUMP 
MOV (SP)». TEST ADO 



s REMAP OLD BANK 



MOV (SP)*. PATTERN 
MOV (SP)*.BANK 

MOV R3. (SP) 



MOV (SP)»,R3 



: RESTORE CSRNO. 



10922 043252 



10923 043252 

10924 043256 
10925 



004737 
000207 



FSCM06: SUBTST <<FS 



,*SUBTEST 



FS 



COMMAND 6 TYPE CONFIGURATION MAP>> 

COMMAND 6 TYPE CONFIGURATION MAP 



032610 



CALL PCONFIG 
RETURN 



CVMJABO MSVll-J hEMORY 
FS COMMAND 6 

10928 043260 



DIAG. tlACRG Y05.02 Monday 07 -Oct -85 16:57 
TYPE CONFIGURATION MAP 
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SEQ 0306 



10929 043260 
043260 
043264 
043270 
043274 
043300 

10930 043304 

10931 043310 
043310 



10932 
10933 



10934 
10935 



10936 
10937 

10938 



043314 
043314 
043322 
043324 
043326 
043326 
043330 
043330 
043332 
043332 
043332 
043332 



10939 

10940 043336 
043336 



10941 
10942 
10943 
10944 
10945 
10946 
10947 
10948 



10949 
10950 



10951 
10952 



10953 
10954 
10955 

10956 



043342 
043350 
0433S6 
043362 
043370 



043376 
043376 
043404 

043412 
043412 
043416 
043416 
043422 
043422 
043426 
043430 



013746 
013746 
013746 
013746 
013746 
010637 



002102 
002112 
000060 
000062 
002076 
002306 



104401 067741 



032777 
001402 
104470 

000401 

104502 



104401 067762 



104401 067555 



012737 
012737 
017700 
042737 
052777 



012737 
012737 



005037 

004737 

005737 
001406 

005737 
li 



FSCM07: 



i*SUBTEST 
I***' 



000001 137314 



042 
043440 
043444 
043444 
043444 



004737 



043466 000060 

000340 000062 
137262 

000200 177776 

000100 137244 



177777 002612 
177777 002110 



002102 
037760 
002116 
002124 



022342 



SUBTST <<FS COMMAND 7 
FS COMMAND 7 

BANK. PATTERN. TKVEC. 



SOB -A LONG TEST>> 
SOB-A-LONG TEST 



PUSH 



MOV 
TYPE 
TYPEIT 
.DSABL 



SP.FSSTACK 
MSG055 
.MSG055 
CRF 



IF «SUO SET. IN OSWR 



ECCOIS 
ELSE 



CLRCSR 
END iOf IF 

TYPE MSG056 
TYPEIT .MSG056 
.DSABL CRF 



TKVEC *2.N0PAR 

MOV BANK.-(SP) 
MOV PATTERN, -(SP) 
MOV TKVEC. -(SP) 
MOV TKVEC»2.-(SP) 
MOV NOPAR.-(SP) 

iSAVE LAST GOOD STACK POINTER 

; SOB-A-LONG TEST 



BIT *SUO.aSHR 
BEQ L411 
: DISABLE ERROR CORRECTION 



TYPE 

TYPEIT 

.DSABL 

MOV 

MOV 

MOV 

BIC 

BIS 



SET 



MSG046 

.MSG046 

CRF 

♦CM07C. TKVEC 
•340. TKVEC? 
atTKB.RO 
«BIT7,PSU 
«BIT6.aiTKS 



HEADER. MUT 



i CLEAR CSRS 



BR L412 
L411: I : t : ; : 



L412: i I { t i : 
sBELL - EACH PASS COMPLETE 



(TO ESCAPE TYPE ANY KEY! 



:KILL ANY OLD INTERRUPT 
s LOWER CPU PRIORITY TO 140 
: ENABLE KEYBOARD INTERRUPTS 



MOV *-l. HEADER 
MOV #-l.MUT 



CMD7B: FOR BANK «0 TO LAST6ANK 



CALL EX6ANK 

IF ACFLAG IS TRUE AND RRFLAG IS FALSE 



INVALIDATE 
CALL MT003i 
END tOF IF ACFLAG 

END sOF FOR BANK 



CLR BANK 

B70: i : : t : 1 



TST ACFLAG 
BEQ L413 
TST RRFLAG 
BNE L413 



L413: 1 i I s t : 



cvnjABO nsvii-j memory diag. 



5 


CorwiANO 


7 


SOe-A-LONG TEST 




043444 


005237 








043450 


023737 








043456 


003757 








043460 








10957 


043460 






T VDP 
1 Trt 


043460 


104401 




TYPPTT 








ncARi 


109S6 


043464 






uU 1 U 




043464 


000752 






10959 










10960 


043466 


013706 






10961 


043472 


042777 




1X71 A3 RTT 
f X^c DXl. 


10962 


043500 


117700 






10963 


043504 






pnp 




043504 


012637 








043510 


012637 








043514 


012637 








043520 


012637 


AASI 1 O 
wvc Axe 






043524 


012637 


002102 




10964 


045530 






MAP 




043530 


010346 








043532 


013703 


002102 


MOV 




043536 


004737 


035604 


CALL 










.DSABL 




043542 


012603 






10965 


043544 


004737 


037760 


CALL 


10966 


043550 


000207 




RETURN 



MACRO Y0S.02 Monday 07-0ct-85 16:57 Pag* 338-1 



SEQ 030 



IBELL 
. *BELL 
CRF 
CM07B 



{RING BELL 



E70: 



INC BANK 

CMP BANK.LASTBANK 
BLE B70 

: : : > 



BR CM07B 
: RECOVER OLD STACK POINTcR 
:READ CHAR TO KILL FLAG 



FSSTACK.SP 
•BIT6.8ITKS 
aiTKB.RO 

NOPAR . TKVEC *2 . TKVEC , PA T TERN . BANK 

MOV (SP)*. NOPAR 
MOV (SP).,TKVEC.2 
MOV (SP)*. TKVEC 
MOV (SP)». PATTERN 
MOV (SP)*.BANK 

BANK .-MAP SUPERVISOR SPACE (TEST AREA) TO BANK 

nOV R3,-(SP) 

BANK.R3 

MAPPER 

CRF 

MOV (SP)..R3 

EXBANK 



CVf1J*B0 MSVll-J MEMORY 
rs COMMAND 7 

10969 043S52 



10970 043552 
04SSS2 
04SSS4 
043556 
04S560 

10971 043564 

10972 043572 

10973 043576 
043576 
043602 

10974 043604 

10975 043612 

10976 043620 
043620 

10977 043624 
043624 
043630 

10976 043632 
043632 



OIAG. MACRO Y0S.02 
SOB-A-LONG TEST 



Mor>d*y 07 -Oct -85 16:57 Pag* 340 



SEQ 0308 



10979 



10980 
10981 



10982 
10983 
10984 



10985 
10986 



043636 
043636 
043642 
043644 
043650 
043650 
043654 
043654 
043660 
043664 
043664 
043670 
043672 
043672 
043676 
043700 
043700 



10987 043704 
043704 

10988 043712 
043712 

10989 043712 
043712 

043716 
043720 
043721 



105763 
001424 

005737 
001005 

104401 

012737 



FSCMD8: SU8TST 



i*SUBTEST 



002666 
002334 
070300 
177777 



002334 



013746 002102 

104403 

006 
000 



PUSH 



<<FS COMMAND 8 
FS COMMAND 6 

R0.R2.R3.eANK 



ERROR SUMMARY >> 
ERROR SUMMARY 



010046 








010246 








f\% A VAX 

010346 








01S74O 


002102 






013737 


056724 002454 


nov 


IrnSSa TEMP 


009997 


002494 




Itnr 






1 TrUtC 


Itnr 


013746 


AA9A 

002434 


nuv 


TCMD f CD ^ 






T VDAC 








.OSABL 


CRF 


UIO f O ' 




MOV 


KIPAR4.SAV4 


A1 97^7 
Ulc r A r 


AAlAAA 1 70T^A 


MOV 


«1000.KIPAR4 






TYPE 


MSG12S 




A7 1 T 1 O 


TYPEIT 


.MSG12S 




.DSABL 


CRF 






TYPOEC 


lERTTL 




AA3&XA 


MOV 


♦ERTTL.-(SP) 


104405 




TYPOS 








.DSABL 


CRF 






TYPE 


MSG079 


104401 


070335 


TYPEIT 


.MSG079 




.DSABL 


CRF 






IF lERTTL NE M 


005737 


002630 






001445 








005037 


002334 


CLR 


SUCCESS 






FOR BANK AO TO 


005037 


002102 






013703 


002102 


MOV 


BANK,R3 


070327 


000004 


nuL 


#4 RS 




IFB 


CONFIG •2(R3) 



MOV RO.-(SP) 
MOV R2.-(SP) 
MOV R3.-(SP) 
MOV BANK.-(SP) 



I, SAVE TEMP FOR TYPEOUT 

tiGO TfPE-- DECIMAL ASCII UITH SIGN 

: t il.L.C. iREV B 
1 1 :1.L.C. tREV B 
: PASSES COMPLETED 



;SAVE »ERTTL FOR TYPEOUT 

iGO TYPE—DECIMAL ASCII UITH SIGN 

:ERROR(S) DETECTED 



TST »ERTTL 
BEQ L414 



CLR BANK 
B71: i I i I i : 



TYPEIT 
.DSABL 



IF SUCCESS IS FALSE 

TYPE MSG076 
.MSG076 
CRF 

SET SUCCESS 
END I OF IF SUCCESS 



.-BANK ERRORS 



TSTB C0NFIG*2(R3) 
BEQ L41S 

TST SUCCESS 
BNE L416 



10990 043722 116300 002666 



TYPOCS BANK. 3 
MOV BANK.-(SP) 



TYPOS 
.BYTE 6 
.BYTE 0 
.DSABL CRF 
MOVB 



MOV 

L416: s 1 1 1 i i 



#•1. SUCCESS 



tiSAVE BANK FOR TYPEOUT 
ii3 

SI GO TYPE --OCTAL ASCII 

I J TYPE 6 DIGITS 

1 1 SUPPRESS LEADING ZEROS 



C0NFIG*2(R3).R0 



CvnjASO nsvii-j ncnoRY diag 

FS COMMAND 8 



MACRO YDS. 02 
ERROR SUMMARY 



Monday 07-0ct-85 16:57 Paga 340-1 



10991 


043726 


042 ^00 


177400 


10992 


043732 








043732 


010046 






043754 


104405 




10993 


043736 








043736 


104401 


002660 


10994 


043742 








043742 






10995 


04374? 








043742 


005237 


002102 




043746 


023737 


002102 




043754 


003737 






043756 






10996 


043756 








043756 






10997 


043756 


013737 


002270 


10996 


043764 








043764 


C 12637 


002102 




043770 


012603 






043772 


012602 






043774 


012600 




10999 


043776 


000207 





002556 



172350 



SEQ 0309 



BIC 
TYPOEC 
RO. -(SP) 



#tC377.RO 
RO 



MOV 
TYPOS 

.DSABL CRF 

TYPE ICRLF 
TYPEIT , ICRLF 
.DSABL CRF 

END (OF IFB CONFIG(RS) 

END i OF FOR BANK 



END iOF IF lERTTL 



; J SAVE RO FOR TYPEOUT 
liGO TYPE—DECIMAL ASCII UITH SIGN 



L415:iii>ii 



MOV 
POP 



RETURN 



SAV4.KIPAR4 
BANK.R3.R2.ro 



INC BANK 

CMP BANK.LASTBANK 
BLE B71 
E71 : 1 1 i I i i i 



sI.L.C. i : ;REV B 



L414: i i i i t I 



MOV CSP)*.BANK 
MOV (SP)».R3 
MOV (SP)».R2 
MOV (SP)*.R0 



CvnjABO nsvii-J nEncwr 
rs COnriANO 8 

11002 044000 



ox AG. riACRO Y05.02 
ERROR SUItMRY 



FSCH09 
l*SUBTEST 



nenday 07 -Get -85 16:57 Pao« 342 
SUBTST 



SEQ 0310 



llOOS 044000 
044000 
044004 
044010 
044014 
044020 

11004 044024 

11005 044030 
044030 



013746 
013746 
013746 
013746 
013746 
010637 



002102 
002112 
000060 
000062 
002076 
002306 



104401 070230 



11006 

11007 



11008 

11009 



11010 
11011 

11012 
11013 



0440S4 
044094 
044042 
044044 



044046 
044050 
044050 
044052 
044052 
044052 
044052 



032777 
001402 
104470 

000401 

104502 



104401 067762 



000001 136574 



11014 


044056 








044056 


104401 


067555 


11015 


044062 


012737 


044206 


11016 


044070 


012737 


000340 


11017 


044076 


017700 


136542 


11018 


044102 


042737 


000200 


11019 044110 


052777 


000100 


11020 








11021 


044116 








044116 


012737 


177777 




044124 


012737 


177777 


11022 








11023 


044132 








0441S2 


005037 


002102 




044136 






11024 


044136 


004737 


037760 


11025 


044142 








044142 


005737 


002116 




044146 


001406 






044150 


005737 


002124 




044154 


001003 




11026 


044156 


104511 




11027 


044160 


004737 


020714 


11028 


044164 








044164 






11029 


044164 








044164 


005237 


002102 



000060 
000062 

177776 
136524 



002612 
002110 



PUSH 



nov 

TYPE 

TYPEIT 

.OSABL 



<<FS COrttANO 9 REFRESH TEST>> 

FS COMriANO 9 REFRESH TEST 

BANK . PATTERN . TK VEC , TK VEC •2 . NOPAR 



SP.FSSTACK 
MSG073 
.nSG073 
CRF 



IF •SUO SET. IN aSUR 



ECCDIS 
ELSE 



CLRCSR 
END iOF IF 



TYPE 

TYPEIT 

.OSABL 

TYPE 

TYPEIT 

.OSABL 

rtov 
nov 
riov 
BIC 
BIS 

SET 



nSG056 

.nSG056 

CRF 

nSG046 

.nSG046 

CRF 

♦CM09C.TKVEC 

•340.TKVEC2 

8ITKB.ro 

•6IT7.PSW 

•eiT6.8ITKS 

HEAOER.nUT 



Cn09B: FOR BANK :- «0 TO LASTBANK 



HOV BANK.-(SP) 
MOV PATTERN, -(SP) 
HOV TKVEC.-(SP) 
MOV TKVEC»2.-(SP) 
NOV NOPAP -(SP) 
(SAVE LAST GOOD STACK POINTER 
(REFRESH TEST 



BIT •SW0.8SUR 
BEQ L417 
I DISABLE ERROR CORRECTION 



[CLEAR CSRS 



BR L420 

L417: 1(11(1 



L420: i ( ( ( i ( 
I BELL - EACH PASS COMPLETE 



(TO ESCAPE TYPE ANY KEY! 



(KILL ANY OLD INTERRUPT 
(LOWER CPU PRIORITY TO 140 
(ENABLE KEYBOARD INTERRUPTS 



NOV 

nov 



#-1. HEADER 
#-l.«UT 



CALL EX6ANK 

IF ACFLAG IS TRUE AND RRFLAG IS FALSE 



INVALIDATE 
CALL NT0022 
END (OF IF ACFLAG 



END I OF FOR BANK 



CLR BANK 

872 : ( I ( 1 1 ( 



TST ACFLAG 
BEQ L421 
TST RRFLAG 
BNE L421 



L421 :(((((( 

INC BANK 



I 



cvnjASO nsvii-j nEnoRv diac. fiacro yos.02 

FS COnnANO 9 REFRESH TEST 



nonday 07-Oet-eS 16:57 Pag* 342-1 



SEQ 0511 



044170 
044176 
044200 
11050 044200 
044200 



11051 

110S2 
llOSS 
11054 
llOSS 
110S6 



11057 



044204 
044204 

044206 
044212 
044220 
044224 
044224 
0442S0 
044254 
044240 
044244 
044290 
0442S0 
0442S2 
044296 



044262 
11056 044264 
11059 044270 
11040 



025757 
005797 



000792 

015706 
042777 
117700 

012657 
012657 
012657 
012657 
012657 

C10346 
01S705 
004757 

012605 
004757 
000207 



002102 002556 



104401 002655 



00250C CM09C: 
000100 156422 
156420 

002076 
000062 
000060 
002112 
002102 



002102 
055604 



057760 



TYPE 
TYPEIT 
.0SA8L 
GOTO 



MOV 
BIC 
hOVB 
POP 



MAP 

nov 

CALL 
.OSABL 

CALL 
RETURN 



IBELL 
.•BELL 
CRF 
Cri096 



(RING BELL 



E72: 



CMP 
BLE 

I i i 1 1 1 1 



BANK. 
B72 



LASTBANK 



BR CM098 



•RECOVER OLD STACK POINTER 



FSSTACK.SP 
•6IT6.8ITKS 

8ITKB.ro (READ CHAR TO KILL FLAG 

NOPAR . TKVEC ^2 . TKVEC . PATTERN. BANK 

MOV (SP)*. NOPAR 
MOV (SP)*.TKVCC*2 
MOV (SP)». TKVEC 
MOV (SP)». PATTERN 
MOV (SP)*.BANK 

BANK (MAP SUPERVISOR SPACE (TEST AREA) TO BANK 

MOV R5.-CSP) 

BANK.RS 
MAPPER 

CRF 

MOV (SP)*.R5 

EXBANK 



cvnjABO nsvii-j rcnoRY 

FS COrVMNO 9 



OIAG. 
REFRESH 



11045 


044272 




11044 


044272 






044272 


010046 


11045 


044274 






044274 


104401 


11046 


044300 


104413 


11047 


044302 






044 S02 


012600 


11048 


044304 


042700 


11049 


044310 


110037 


11050 


044314 






044314 


012600 


11051 


044316 


000207 


11052 






11053 


044320 




11054 


044320 






044320 


104401 



11055 044324 
044324 012737 
044332 012737 

11056 044340 000207 
11057 

11058 044342 



11059 044342 
044342 



104401 



11060 044346 005037 

11061 044352 
044352 012737 

11062 044360 000207 
11063 



070361 



177760 
002357 



070526 



177777 
177777 



070556 
002006 
177777 



MACRO Y05.02 Monday 07- 
TEST 

FCMOlO: SUBTST 



Oct -85 16 57 Paga 344 



SEQ 0312 



002006 
002010 



002010 



i*SUBTEST 



FCMOll: 



PUSH 

TYPE 

TYPEIT 

.OSABL 

ROOCT 

POP 

6IC 

MOVB 

POP 

RETURN 

suersT 



<<FS COrttANO 10 
FS COMHANO 10 

RO 



SET FILL COUNT >> 
SET FILL COUNT 



MSG085 

,MSG085 

CRF 

RO 

♦tC17.R0 

RO.IFILLS 

RO 



jFILL COUNT(OCTAL)? 



MOV RO.-(SP) 

HLi i"?P)».RO 
MOV (SP)».RO 



; •SUBTEST 



<<FS COMMAND 11 
FS COMMAND 11 



ENTFR KAMIKAZE MOOE>> 
ENTEn KAMIKAZE MODE 



TYPE 
TYPEIT 
.DSABL 
SET 



RETURN 



MSGlOl 
.MSGlOl 
CRF 

KAMIKAZE.SKIPKAMI 



{ENTERING KAMIKAZE MODE 



MOV KAMIKAZE 
MOV •-l.SKIPKAMI 



FCM012: SUBTST 



i < 



; ♦SUBTEST 

* TYPE 

TYPEIT 
.DSABL 
CLR 
SET 

RETURN 



<<FS COWANO 12 EXIT KAMIKAZE MODE>> 

FS COMMAND 12 EXIT KAMIKAZE MODE 

: LEAVING KAMIKAZE MODE 



MSG102 
.M5G102 
CRF 

KAMIKAZE 
SKIPKAMl 



MOV • 1. SKIPKAMl 



CVnjABO nsvil J MEnOftr OIAC. riACRO Y0S.02 MoAday 07-0ct-6S 16:57 Pms S44-1 

rs COrtlANO 14 TURN CACHE ON SEO 0S15 



11064 


044 B62 






11065 


044S62 








044362 


104401 


070704 


11066 


044366 


104424 




11067 


044370 


013737 


002544 


11068 


044376 


00S0S7 


002544 


'.1069 


044402 


000207 




11070 








11071 


044404 






11072 


044404 








044404 


104401 


070722 


11073 


044410 


013737 


002546 


11074 


044416 


104423 




1107S 


044420 


000207 




11076 









002546 



002544 



FCM013: SUBTST <<FS 
I •SUBTEST FS 



COttlANO IS 
COMNANO 13 



TYPE 
TYPEIT 
.OSABL 
CACHOFF 

nov 

CLR 

RETURN 
FCf1014: SUBTST 



nSG106 

.HSG106 

CRF 

CACHKN.CACHKN»2 
CACHKN 



TURN CACHE OFf>* 
TURN CACHE OFF 
I CACHE IS OFF 



I TURN CACHE OFF 

(SAVE OLD CACHE ON STATE 

I KEEP CACHE OFF 



(•SUBTEST 



<<FS 
FS 



COHHANO 14 
COHNANO 14 



TURN CACHE 0N>> 
TURN CACHE ON 



TYPE HSG107 

TYPEIT .HSG107 

.OSABL CRF 

HOV CACHKN * 2 . CACHKN 

CACHON 

RETURN 



s CACHE IS ON CEXCEPT DURING ACTUAL PATTERNS) 



i RESTORE OLD CACHE ON STATE 
5 TURN CACHE ON 



cvnjAao Msvii J Kno«v 

rs COrtlANO 14 

11089 

11090 044422 



OIAG. MACRO Y05.02 Monday 07-0ct-a5 16:57 Pmum 345 
TURN CACHE ON 



SEQ 0314 



11091 044422 
044422 

11092 044426 

11093 044432 
044452 

11094 044432 
044432 

11095 044432 
044432 



11096 
11097 

11096 



11099 

11100 

11101 
11102 
11103 
11104 

11105 
11106 



0444 36 
044440 
044440 
044442 
044442 
044446 
044450 
044452 
044454 
044454 
044454 
044456 
044456 
044456 
044460 
044462 
044470 
044470 
044472 
044472 
044472 
044472 
044472 



11107 044476 
044476 

11108 044504 
11109 



104401 
004737 



104401 
10441S 

012601 

020127 
003002 
005701 
002001 

000406 



006S01 
006301 
052761 

000760 



104401 



012737 
000207 



FCH015: SUBTST <<FS 



{•SUBTEST 



FS 



COMMANO 15 
COMMAND 15 



TEST ONLY SELECTED BANKS>> 
TEST ONLY SELECTED BANKS 



0/0631 
044516 



067142 



000177 



040000 002666 



070777 
177777 



002002 



TYPE MSG105 
TYPEIT .MSG105 
.DSABL CRF 
CALL CM016A 
BEGIN CM016L00P 

REPEAT 

TYPE MSG050 
TYPEIT .MSG030 
.DSABL CRF 

RDOCT 

POP Rl 



IF Rl GT »177 OR Rl LT #0 



LEAVE CMD16L00P 

END :0F IF Rl 

ASL Rl 
ASL Rl 

BIS «6IT14.C0NFIG»2(R1) 
END iOF REPEAT 

END CM016LOOP 

TYPE MSGllO 

TYPEIT .MSGllO 

.DSABL CRF 

SET SELONLY 

RETURN 



s ENTER BANKS IN OCTAL USE NUMBER OUTSiOC RANK TO TERMINAT 

{ERASE OLD SELECTIONS 

B73: i t i i I > 
B74 : 1 1 I I ; i 

:BANK(0 177)? 



{READ AN OCTAL NUMBER ONTO THE STACK 

{PUT IT IN Rl 

MOV (SP)*.R1 

CMP Rl.#177 
BGT L422 
TST Rl 
BGE L423 

L422: ({{{{{ 

BR E73 
L42S :{{{{{{ 

:R1 <- Rl • 4 

BR B74 

E74:s{i{{s 

E73 :::;{{{ 
{ONLY SELECTED BANKS WILL BE TESTED 



MOV SELONLY 



CVMjAeO ttSVll J MCMOPr OIAG. MACRO Y05.02 Monday 07-Oct-a5 16:57 Pag* 345-1 
FS COnriANO 16 RESUME TESTING ALL BANKS 



SCO OSIS 



11 no 044506 



11111 044506 
044506 



11112 
llllS 
11114 
llllS 
11116 
11117 
11118 



11119 
11120 



11121 



044512 



044516 
044522 
044524 
044526 
044526 
044550 
0445S0 
0445S6 
044556 
044542 
044544 
044546 
044546 



104401 071043 

005037 002002 

013702 002556 

006502 

006S02 

005001 

042761 040000 002666 

062701 000004 

020102 

003771 

000207 



rCM016: SU8TST <<FS 
i •SUBTEST FS 



COrtlANO 16 
COMMANO 16 



TYPE MSGlll 

TYPEIT .MSGlll 

. DSABL CRF 

CLR SELONLY 

: ENTRY POINT FROM CM015 

CMD16A: MOV LASTBANK.R2 

ASL R2 

ASL R2 

FOR Rl :- «0 TO R2 BY *4 



SIC «BIT 14. CONFIG »2(R1) 
END :0F FOR Rl 



RESUME TESTING ALL BANKS>> 
RESUME TESTING ALL BANKS 
iALL BANKS WILL BE TtSTEO 



RETURN 



CLR Rl 

B75: i i i i s i 



ADO M.Rl 
CMP R1,R2 
BLE B75 

E75 : : s i i i i i 



CVnjABO nsvil-J MEMORY OIAG. MACRO Y05.02 Monday 07-0ct-8S 16:57 Page 347 

rs coririANO 16 resume testing all banks 



SEQ 0316 



11124 044550 



11125 044550 
044550 

11126 044554 

11127 044562 



104401 

012737 
000207 



071401 
177777 



006304 



FCM017: SUBTST 



I •SUBTEST 



<<FS 
FS 



COmANO 17 
COMnANO 17 



ENABLE TRACE >> 
ENABLE TRACE 



TYPE 
TYPEIT 
.OSABL 
MOV 

RETURN 



MSG127 

.MSG127 

CRF 

•-1. TRACE 



11130 044564 



11131 044564 
044564 

11132 044570 

11133 044574 



104401 

005037 
000207 



071420 
006304 



FCM018: SUBTST 



{•SUBTEST 



<<FS 
FS 



COMMAND 18 
COMMAND 18 



DISABLE TRACE >> 
DISABLE TRACE 



t < 



TYPE 
TYPEIT 



MSG128 
.MSG128 



. DSABL CRF 
CLR TRACE 
RETURN 



CVnjASO nSVil-J MCMORY OIAG. macro YOS.O? nondsy 07-Oet-aS 16:57 Pag* 351 
FS COnnANO 18 DISABLE TRACE 



SEQ 0517 



1 1 1 X6 

AAA 


W ~ ~ J 1 V 






UHICHCSR : SUBTST 


<<SU6R DETERMINE CORRECT CSR>> 










i*SUBTEST 


SUBR DETERMINE CORRECT CSR 


111 X7 
X X X J r 










MOV 


totcsrs.ro 


iGET CSR'S FLAG 


1 1 1 

XXX JO 




022700 


100000 

i www 




CflP 


«6IT1S.R0 


tCSR 0? 


11139 










BNE 


1* 


iNO - SKIP 






005037 


002152 

WC A 




CLR 


CSRNO 


J YES - SET IT UP 


11141 


044614 


000207 






RETURN 






1 1 149 














tUHICH CSR(O-F) 


1 1 14^ 


044616 






1«: 


TYPE 


MSG022 


044616 


104401 


066775 




TYPEIT 


.MSG022 














.OSABL 


CRF 






044622 


104412 






ROLIN 




tGET CHARACTER 


11145 


044624 








POP 


RO 


|PUT IN RO 


044624 


012600 










MOV (SP)».RO 


11146 


044626 


011000 






MOV 


(RO}.RO 


iPUT CHAR IN RO 


H147 


044630 


020027 


000106 




CMP 


R0.«106 


J CHECK LIMIT 


11146 


044634 


101370 






BHI 


1* 


J IF BAD LOOP TILL HE TYPES IT RIGHT 


11149 


044636 


C22700 


000101 




CMP 


«' A.RO 




11150 


044642 


103002 






BHIS 


2* 




11151 


044644 


162700 


000007 




SUB 


♦7,R0 




11152 


044650 


162700 


000060 


21: 


SUB 


«60.R0 




11153 


044654 


006300 






ASL 


RO 




11154 


044656 


010037 


002152 




MOV 


RO. CSRNO 




11155 


044662 


000207 






RETURN 







cvnjABO nsvii-j riEnoRY 

ERROA DATA (SUPERVISOR 



DIAG. MACRO Y0S.02 
) SETUP STUFF 



Monday 07 Oct 85 16:57 Pag* 365 



SEO 0318 



11621 

11622 044664 
044664 
044670 

11623 044676 
044676 
044702 

11624 044704 
044704 



11625 

11626 
11627 

11628 



11629 
11630 

11631 

11632 

11633 
11634 
11635 



044712 
044712 
044720 
044722 
044722 
044722 
044722 
044726 
044730 
044730 
044734 
044734 
044736 
044736 
044736 
044742 
044742 
044742 

044746 



010137 
162737 

005737 
001007 

053737 



016137 
104417 



005737 
001003 

C10237 

000402 

010337 

000137 



002034 
000002 

002144 

002552 
177776 

177654 
002044 

002044 
050120 



11636 


044746 








044746 


005737 


002022 




044752 


001002 






044754 


004737 


034040 




044760 






11637 


044760 








044760 


010046 




11636 


044762 


005037 


002150 


11639 


044766 


104505 




11640 


044770 






044770 


053737 


002552 


11641 


044776 


005711 




11642 


045000 


104417 




11643 


045002 


104426 




11644 


04S004 


013700 


002150 


11645 


045010 


104503 




11646 


045012 


072027 


177773 


11647 


045016 


042700 


177600 


11646 


045022 








045022 


010137 


002034 


11649 


045026 


005037 


002044 


11650 


045032 








045032 


053737 


002552 



.SBTTL ERROR DATA (SUPERVISOR) SETUP STUFF 
«PER25: LET ADDRESS :- Rl «2 



002034 

177776 
002052 



t ENTER TEST MODE 



(ENTER KERNEL MODE 



PERRA3 
USUBTEST 



IF ABORTFLAG IS FALSE 

TESTAREA 
BIS TESTMODE.PSU 
.DSABL CRF 

LET BAD :- -2(R1) 

KERNEL 
END J OF IF ABORTFLAG 

IF 177654 EG #0 

LET GOOD :- R2 
ELSE 

LET GOOD :- R3 
END iOF IF 
JMP PERRAU 
SUBTST <<DATA UAS 3 UORDS>> 

DATA UAS 3 WORDS 
IF BADPC EQ #0 THEN ICALL BADSTACK 



MOV Rl. ADDRESS 
SUB •2. ADDRESS 

TST ABORTFLAG 
BNE L424 



:G0 TO SYSTEM TEST MODE 

MOV •2(R1).BAD 



L424 : J : 1 1 1 1 

TST 177654 
BNE L425 

MOV R2,G000 

BR L426 
L425 : I : i I : : 

MOV R3.G00D 

L426 : t : > : i I 



PUSH 



RO 
CSR 



177776 



177776 



CLR 

CHKIDIS 
TESTAREA 

BIS TESTMODE.PSU 

.DSABL CRF 

TST (Rl) 

KERNEL 

READCSR 

MOV CSR.RO 
CLRICSR 

ASH #-5.R0 
BIC #tCl77,R0 
LET ADDRESS :- Rl 

CLR GOOD 
TESTAREA 

BIS TESTMODE.PSU 



TST BADPC 
BNE L427 
JSR PC. BADSTACK 
L427: { ; i I i i 

MOV RO.-(SP) 
jMAKE SURE CSR BIT HOLDER IS CLEAR 
(DISABLE ECC C URITE C^^CKBITS FROM 1 SELECTED CSR 

iGO TO SYSTEM TEST MODE 

I READ LOCATION TO READ CHECKBITS INTO CSR 

I GET CSR CONTENTS 

:SAVE CSR CONTENTS IN RO 

(RETURN CSR TO NORMAL MODE 

(MOVE CHECK BITS TO BOTTOM OF UORD 

(CLEAR OFF EXTRANEOUS GARBAGE 

(SAVE VIRTUAL ADDRESS FOR PRINTOUT 

MOV Rl. ADDRESS 

(FIRST TEST UORD URITTEN SHOULD ALUAYS BE ZERO 
(ENTER TEST MODE 

(GO TO SYSTEM TEST MODE 



I 



cvnjABO nsvii-j memory oiag. 

DATA WAS 3 WORDS 



11651 
11652 
1165S 
11654 
11655 
11656 
11657 
11656 

11659 
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SEQ 0319 



11660 
11661 



11662 
11663 

11664 









. DSABL 


CRF 


045040 


011137 


002052 


MOV 


(Rl).BAD 


045044 


011437 


002054 


MOV 


(R4),BAD2 


045050 


104417 




KERNEL 




045052 


110037 


002056 


Move 


R0.BA03 


045056 


105037 


002057 


CLRB 


BAD3»1 


045062 


004737 


050354 


CALL 


PERBNK 


045066 


104033 




ERROR 


♦ 33 


045070 






POP 


RO 


045070 


012600 








045072 






IF *SU0 


SET. IN 8SUR 


045072 


032777 


000001 135536 






045100 


001402 








045102 


104506 




ENASBE 


045104 






ELSE 




045104 


000401 








045106 










045106 


104472 




ECCINIT 


045110 






ENDi OF 


IF •SUO 


045110 










045110 


000002 




RTI 





J GET BAD DATA FROM MUT FIRST WORD 

(AND SECOND UORO 

: ENTER KERNEL MODE 

;MOVE BAD CHECKBITS FOR PRINTOUT 

i CLEAR OFF THE OTHER UNUSED BITS 

;MARK BANK AS BAD IN CONFIG lABLE 



; RESTORE RO 



iTRAP ON SINGLE BIT ERRORS 



MOV (SP)».RO 

BIT «SUO.SSUR 
BEQ L430 



BR L431 

L430::;ijj! 
jTRAP ON UNCORRECTABLE ERRORS 

L431:si::i: 



CvnjABO nsvii-J nEtiOftY OIAG. 

DATA WAS 3 WORDS 



11667 


045112 








045112 


0101S7 


002044 


11666 


045116 






045116 


011637 


002054 




045122 


163737 


000016 


11669 


045130 








045130 


005737 


002144 




045134 


001007 




11670 


045156 








0451S6 


0SS7S7 


002552 


11671 


045144 








045144 


017737 


134664 


11672 


045152 


104417 




11673 


045154 








045154 






11674 


045154 


000137 


050120 


11675 








11676 


045160 







11677 


045160 








045160 


010046 






045162 


013746 


000004 




045166 


013746 


000114 


1167S 


045172 


010637 


045256 


11679 


045176 


012737 


045236 


11660 


045204 


012737 


045236 


11681 


045212 


013700 


002034 


11662 


045216 








045216 


053737 


002552 


11683 


045224 


011037 


002052 


11684 


045230 


104417 




11685 


045232 


005037 


002144 


11686 


045236 


013706 


045256 


11687 


045242 








045242 


012637 


000114 




045246 


012637 


000004 




045252 


012600 




11666 


045254 


000207 




11669 


045256 


000000 





riACRO Y05.02 Monday 07-0ct-S5 16 ^7 Pao« 367 



IPERSO: LET GOOD :- Rl 

LET ADDRESS :- (SP) - 16 

IF ABORTFLAG IS FALSE 



SEQ 0320 



002034 

177776 
002052 



000004 
000114 



177776 



TESTAREA 
BIS TESTnODE.PSU 
.OSABL CRF 

LET BAD :- 8ADDRESS 

KERNEL 
END iOF IF ABORTFLAG 



jnP PERRAU 

GE rOATA : SUBTST <<GET DATA FROM ABORTED AREA IF P0SSI6LE>> 
' GET DATA FROM ABORTED AREA IF POSSIBLE 



nOV Rl.GOOO 

MOV (SP). ADDRESS 
SUB 16. ADDRESS 

TST ABORTFLAG 
BNE L432 

(GO TO SYSTEM TEST nODE 

NOV 0ADDRESS.BAD 

i ENTER KERNEL MODE 

L432 : 1 1 1 1 i I 



: ENTER TEST nODE 



I •SUBTEST 



II: 



GETOAl: 



PUSH 


RO.4.114 


MOV 


SP.GETDAl 


MOV 


«ll.4 


MOV 


#11.114 


MOV 


address.ro 


TESTAREA 


BIS 


TESTMODE.PSU 


.DSABL 


CRF 


MOV 


(RO).BAD 


KERNEL 




CLR 


ABORTFLAG 


MOV 


GETDAl.SP 


POP 


114. 4. RO 


RETURN 




0 





NOV RO.-(SP) 
MOV 4,-(SP) 
MOV 114. -(SP) 



iGO TO SYSTEM TEST MODE 



{RESTORE KNOWN GOOD STACK POINTER 



NOV CSP)».ll4 
NOV (SP)*.4 
NOV CSP)*.RO 



CVnjAeO nSVll-J nEMORY oiag. 
POUER TAIL AUTO RESTART 



11692 
11693 
11694 
1169S 
11696 
11704 
11705 
11706 
11707 
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SEQ 0321 



11700 
11709 
11710 
11711 



11712 
11713 
11714 
11715 

11716 
11717 
11710 
11719 
11720 
11721 
11722 

1172S 
11724 



11725 
11726 
11727 
11720 
11729 
11730 
11731 
11732 



04S260 

045260 
045264 
045266 
045266 
045272 
045274 
045S02 
045S10 
045310 
045312 
045314 
045316 
045320 
045322 
045324 

045330 
045334 
045340 
045340 
045342 

045344 
045350 
045352 
045356 
045362 
045S62 
04SS64 
045366 
045366 
045372 
045374 
045400 

045400 
045404 
045410 
045414 
045420 
045422 
045424 



005737 
001403 

013746 
104423 

012737 
012737 

010046 
010146 
010246 
010346 
010446 
C 10546 
013746 

012700 
012701 

014046 

077102 

005737 
001013 
012700 
012701 

014046 

077102 

0057S7 
001402 
004737 



012700 
012701 
012702 
012703 
011021 
012022 
07730S 



.S8TTL 
.SBTTL 



POUER FAIL AUTO RESTART 
ROUTINE POUER OOUN AND UP 



002544 



177746 

046206 
000340 



I POUER OOUN ROUTINE 
tPURON: 

iSAVE CACHE STATUS 
TST CACHKN 
BEQ 51 
PUSH CONTRL 



000024 51: 
000026 



002152 

177700 
000021 



002456 

172300 
000020 



002126 
046214 



172300 
177600 
172200 
000040 



II: 



21: 



POl: 



31: 



CACHON iTURN CACHE ON 

MOV ♦♦ILLUP.PURVEC jiSET FOR FAST UP 

MOV •340.PURVEC*2 iiPRI0:7 

PUSH R0.R1.R2.R3.R4.R5.CSRN0 



{SAVE USER PAR'S £ P0R7 
MOV ♦177700.ro 
MOV ♦17.. Rl 

PUSH -CRO) 

SOB Rl.lt 

J SAVE SUPERVISOR PAR'S 

TST NOSUPER 

BNE PDl 

MOV •172300. RO 

MOV •16.. Rl 

PUSH -CRO) 

SOB Rl 2t 

IF RLFLAG IS TRUE THEN tCALL UOOPS 



(COPY KERr^L MAP TO USER C SUPERVISOR 



MOV CONTPL,-(SP) 



MOV RO.-(SP) 
MOV Rl.-(SP) 
MOV R2.-(SP) 
MOV R3.-(SP) 
MOV R4.-(SP) 
MOV R5.-(SP) 
MOV CSRNO.-(SP) 



MOV -(RO). (SP) 



MOV -(RO).-(SP) 



TST RLFLAG 
BEQ L433 
JSR PC. UOOPS 
L433: i s i : : : 



MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
SOB 



•KIPORO.RO 
•UIPORO.Rl 
•SIP0R0.R2 
•32. .R3 
(RO).(ftl)* 
(R0)*.(R2)* 
R3.3I 



CVMJABO MSVll J MEflORY OIAG. 
ROUTINE POWER OOUN ANO UP 

11754 
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SEQ 0322 



11735 


045426 








045426 


052737 


140000 


11736 


045434 


010600 




1173' 


045436 


104417 




1173S 


045440 








045440 


010046 




11739 045442 


005737 


002456 


11740 


045446 


001006 




11741 


045450 








045450 


052737 


040000 


11742 


045456 


010600 




11743 


045460 


104417 




11744 


045462 








045462 


010046 




11745 








11746 


045464 


013701 


002224 


11747 


045470 








045470 






11749 


045470 








045470 


005037 


002152 




045474 






11749 


045474 


006301 




11750 


045476 








045476 


103003 




11751 


045500 


104426 




11752 


045502 








045502 


013746 


002150 


11753 


045506 








045506 






11754 


045506 








045506 


005701 






045510 


001407 




11755 


045512 








045512 


062737 


000002 




045520 


023727 


002152 




045526 


003762 






045530 






11756 


045530 








045550 






11757 








11756 


045530 








045530 


013746 


177572 




045534 


013746 


177574 




045540 


013746 


177576 


11759 045544 


005737 


002456 


11760 


045550 


001002 




11761 


045552 








045552 


013746 


172516 


11762 








11763 


045556 


012700 


172400 


11764 


045562 


012701 


000020 


11765 


045566 








045566 


014046 




11766 


045570 


077102 





177776 



177776 



7»; 



002152 
000036 



4<: 



iSAVE USER C SUPERVISOR STACK POINTERS 
USER 

BIS •eiTlS!BIT14.PSU iGO TO USER nODE 

.0SA8L CRF 



MOV USP.RO 

KERNEL 

PUSH MO 

TST NOSUPER 

BNE 71 

SUPERVISOR 

BIS MITIA.PSU 

. OSABL CRF 

MOV SSP.RO 

KERNEL 

PUSH RO 



; ENTER KERNEL MODE 



i ENTER SUPERVISOR MODE 
I GO TO 



(ENTER KERNEL MODE 



MOV RO.-(SP) 



SUPERVISOR MODE 



tSAVE ECC REGISTERS 
MOV TOTCSRS.Rl 
BEGIN LCSRSAVE 



sGET CSR'S 

FOR CSRNO :- *0 TO «36 BY *2 

ASL Rl 
ON. ERROR 

REAOCSR 

PUSH CSR 

END I or ON. ERROR 

IF Rl EQ «0 THEN LEAVE LCSRSAVE 

END : OF FOR CSRNO 



END LCSRSAVE 

{SAVE MMRO.1.2.3 

PUSH MMR0.MnRl.MMR2 



TST NOSUPER 

BNE ai 

PUSH rtIRS 

iSAVE KERNEL PAR'S 

MOV •172400.ro 

MOV 416.. Rl 

PUSH -(RO) 



SOB 



R1.4I 



MOV RO. (SP) 



B76: {IS!:: 

CLR CSRNO 
B77: i SIMS 



BCC L454 

MOV CSR. (SP) 

L434: : : i s I I 

TST Rl 
BEQ E76 

AOO •2. CSRNO 
CMP CSRNO. 436 
BLE B77 

E77: s ; J s ; s ! 

E76: i s s s i : 

MOV MMRO.-(SP) 
MOV MMRl.-(SP) 
MOV MMR2.-(SP) 



MOV MMR3. (SP) 



MOV (RO). (SP) 



cvnjAao nsvii-j nEnoRY oiag. 

ROUTINE POUCR OOUN AND UP 



11767 

117«a 04SS72 

11769 049600 

11770 04S602 
045602 
045606 

11771 
11772 



022737 
001004 

01S746 
015746 



017746 15S020 



045612 
045612 

11775 

11774 045616 010637 046212 
11775 

11776 045622 

11777 0456S0 

11775 045632 



rMCRO Y05.02 Nenday 07 -Oct -85 16:57 Pmgm 370-1 



012737 
000000 
000776 



000005 004064 



170202 
170200 



045634 000024 



9»i 



IDOUN: 



I SAVE 
CMP 
BNE 
PUSH 



I SAVE 
PUSH 

tSAVE 

nov 

(NOW 

nov 

HALT 
BR 



SEQ 032 S 



Q-eUS HAP REGISTERS 
•5.PR0TYP 
91 

NAPHO.riAPLO 



lis THIS AN 11/83 
I BRANCH IF NOT 



POSSIBLE 
8SUR 



SOFTWARE SUITCH REGISTER 



STACK POINTER 
SP.tSAVR6 
SET UP REAL VECTOR 
•«PURUP,PURVEC 

IDOUN 



nov nAPHO. (SP) 

nov HAPLO. (SP) 



nov ssuR.-(SP) 



1 1 SAVE SP 

1 1 SET UP VECTOR 

I (HANG UP 



I 



CVnjASO nSVll-J nENORY OIAG. 
ROUTINE POUCR OOMN AND UP 



MACRO YDS. 02 Hontfay 07-0ct-S5 16:57 Psq* 372 



SCQ 0)<r« 



117S1 
11762 
117SS 
117»7 
117M 
117M 
117*0 
11791 
117fJ 
117M 
117*4 

117*5 
117M 
117*7 
117*« 

117** 

iiaoo 

llMl 
11M2 
IIMS 
11604 

1160S 



04M34 
04S634 

04S642 
045646 
045652 
045656 

045660 
045660 
045664 

045670 
045674 
045700 
045700 
045702 
045706 

045710 
045714 
045716 
045716 
045722 
045722 
045726 
04S7S2 

0457S6 
045742 
045746 
045746 
045746 
04S746 
04S7S4 
045754 
04S7S6 
045756 
045760 
045760 
045764 
045766 
045766 
045766 

oii?^ 

045772 
045772 



11606 
11607 
11606 
1160* 

11610 



11611 
11612 

1161S 

11614 
11615 

11616 



11617 



046010 
11616 046010 
046010 



012797 046206 000024 



013706 
005037 
005237 
001375 



012677 
012700 
012702 
012701 

012620 
012722 
077104 

0(»797 
001002 



046212 
046212 
046212 



134752 
172340 
172300 
000020 



077406 
002456 



012637 172516 



012637 
012637 
012637 

013701 
042701 



012737 

006201 

10S003 

012637 
104425 



005701 
001407 

162737 
023727 
002962 



002150 



tPOUER UP ROUTINE 
IPURUP- 

NOV •IILLUP.PURVEC i iSET FOR FAST OOVN 
I RESTORE STACK POINTER 
NOV ISAVR6.SP 
CLR ISAVR6 
II: INC ISAVR6 

BNE II 



101; 
61: 



177576 
177574 
177572 

002224 
177400 



000036 002152 



111; 



000002 002152 
002152 000000 



iiGET SP 

I lUAIT LOOP FOR THE 
iiHAIT FOR THE INC 



TTY 



I lOF A UORO 
{RESTORE POSSIBLE SOFTUARE SWITCH REGISTER 



POP 

NOV 
NOV 
HOV 
POP 



BSUR 

•1 72340. RO 
•KIP0RO.R2 
•16. .Rl 

(RO)* 



HOV 477406. (R2)* 
SOe R1.6I 
{RESTORE NnR3.2.1.0 
TST NOSUPER 
BNE 111 
POP HMRS 



POP 



MnR2.NnRl.nHR0 



{RESTORE ECC REGISTERS 
nOV TOTCSRS.Rl 
BIC 41 77400. Rl 
BEGIN LCSIMESTORE 



NOV (SP}».aSUR 



NOV (SP)*.(R0)< 



NOV (SP)*.NnR3 

NOV (SP)*.NnR2 
NOV (SP)*.mRl 

NOV (SP)*.nnRo 



(GET CSR'S 



FOR CSRNO :- 436 OOUNTO 40 BY 42 



8100: 



I ( I i I i 



ASR 

ON. ERROR 
POP 



Rl 
CSR 



LOAOCSR 
END (OF ON.EIWOR 

IF Rl Ett 40 THEN LEAVE LCSRRESTQRE 
END (OF FOR CSRNO 

Em LCSRRCSTORE 



nOV 436. CSRNO 
BlOl: (((((( 



BCC L43S 

NOV (SP)*.CSR 



L43S: (((III 

TST Rl 
■EQ ElOO 

SUB •2.CSIIN0 
CHP CSRNO. 40 
BGE BlOl 

ElOl: 1 1 1( ( i( 

ElOO: ( ( I { ( I 



CVMJABO MSVll J MEMOPY OIAG. 
ROUTINE POUER DOWN ANO UP 



MACRO Y05.02 
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11819 

11820 046010 012700 172300 

11821 046014 012701 177600 
11022 046020 012702 172200 

11823 046024 012703 000040 

11824 046030 011021 

11825 046032 012022 

11826 046034 077303 



(COPY KERNEL MAP TO USER £ SUPERVISOR 



3>: 



MOV 
MOV 
MOV 
MOV 
MOV 
MOV 

see 



•kipdro.ro 

•UIPORO.Rl 

•SIP0R0.R2 

«32. .R3 

<R0).(R1)* 

(R0)*.(R2)* 

RS.3* 



CVMJASO MSVll J MEHOSr OIAG. 
ROUTINE POUER OOUN AND UP 

11020 
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SEO 0326 



11029 


046036 


AAC ^ ST 


A CA 


11030 


046042 


/\A 4 AAA 

001006 




11031 


AAA A 

046044 








046044 


J12600 




11632 


046046 








AAA AAA 

046046 


U •« f 3 f 


AA A/\/\A 


11S9S 


/\AAAV^ 

046034 


At AAAA 

OIUOUO 




116M 


AA AAAA 

04o050 


1 AAA 1 7 

10441 f 




11639 


A^ ^ A^ ^ 

046060 








AAA AAA 

04evD0 


A« OAAA 




1199« 


AAAi^3 

04evoc 










U9c ' 9 f 


1 AAAAA 


1 1 A VT 
1193 r 




A1 AAAit 




1 1 ATA 


AAAA73 


1 AAA 1 7 




1 1 ATQ 








XI >*u 


AAAATA 

V^OVI ' ^ 


A1 37AA 
Ulc ' W 


1 737AA 


1 1 i* ft 1 


W^OIW 




AAAOPO 
^AA/VCw 












/\AJL1 AA 


A1 3A3A 




1 % AA V 


AAA1 Aik 


A77f A3 

V ' I lUC 












1 1 

110*9 




Ills r W 


1 7711 


1 1 AAA 


AAA 1 t A 


A1 97A1 
Vie « VI 


OAAA91 
vVWc 1 


IIB* ' 


AAJL1 3A 








AAA1 9A 


Al 9A9A 




1 t AAA 

11B49 


AAA1 33 

O^olcc 


A771 A3 
O • ' Ivc 




« 1 AAQ 








1 1 AIM 


AA&1 3A 


Al X777 




1 1 A^l 

1 1031 


AA&1 X9 


Al Y7X7 

Vlw ■ J ■ 


Wcv xc 


1 1S9k 


AAJll AA 








O46140 


012637 


002152 




046144 


012605 






046146 


012604 






046150 


012603 






046152 


012602 






04«154 


012601 






046156 


012600 




uass 


046160 


012737 


045260 


iias4 


046166 








046166 


104401 


067722 



11055 
11056 
11057 
11050 

11059 
11060 
11061 
11062 
11063 



046172 
046176 
046200 
04«200 
046204 
046206 
046210 
046212 



005737 
001402 

012637 
000002 
000000 
000776 
000000 



1-7776 



131: 



177776 



71; 



01: 



134506 
000174 



000024 



002544 
1/7746 



91: 

IILLUP: 
*SAVR6: 



jRFSTORF SUPERVISOR C USER STACK POINTERS 
TsT NGSUPER 
BNC 13 » 
POP RO 

MOV (SP)..RO 

SUPERVISOR jENTER SUPERVISOR MQUE 

:G0 TO SUPERVISOR MODE 



BIS 
. DSABL 
MOV 

KERNEL 
POP 



#BIT14.PSU 

CRF 

RO.SSP 
RO 



{ENTER KERNEL MODE 



USER 
BIS 
.0SA6L 
MOV 

KERNEL 



MOV (SP)«.RO 



•BIT15!BIT14.PSU 
CRF 

RO.USP 

i ENTER KERNEL MODE 
iRFSfORE SUPERVISOR PARS 
MOV •172240.ro 
MOV *16..R1 
POP CRO)* 

SOB R1.7» 

{RESTORE USER PAR S C PDR7 
MOV •177636.ro 
MOV 417.. Rl 

POP (RO). 

SOB R1.0» 

{RESTORE POSSIBLE SOFTWARE DISPLAY REGISTER 



{GO TO USER MODE 



MOV 
MOV 
POP 



tPATMAR.aOISPLAY 
tPATMAR.OISPREG 
CSRN0.R5.R4.R3.R2.R1.ro 



MOV 
TYPE 
TYPEIT 
.0SA8L 



•tPURON.PURVEC 

MSGOSl 
.MSG051 
CRF 



{{SET UP THE POUER DOUN VECTOR 
(REPORT THE POUER FAILURE 



MOV (SP)..(RO)« 



MOV (SP)..(RO). 



MOV {SP)..CSRNO 
MOV (SP)..R5 
MOV (SP)*.R4 
MOV (SP)..R3 
MOV CSP)..R2 
MOV CSP)..R1 
MOV (SP)*.RO 



{RESTORE CACHE STATUS 



TST 
BEO 
POP 

RTI 
HALT 
BR 
0 

.EVEN 



CACHKN 
9t 

CONTRL 



IILLUP 



MOV (SP).. CONTRL 



{{THE POUER UP SEQUENCE UAS STARTED 
{{ BEFORE THE POUER OOUN UAS COMPLETE 
:iPUT THE SP HERE 



CVMJABO MSVll J MEMOftt OIAG. 
ROUTINE POyER DOUN AND UP 



11875 


046214 






1 18 '6 


046214 








046214 


013746 


AA^ f A^ 


11877 


046220 


005037 


002102 


11878 


046224 










UlUMO 








WIS rUO 
















A1 9AAV 

Ulceus 




110 7' 










046240 


052737 


040000 


4 1 AAA 




Ul d r 9 r 




1 1 MM 1 




vX^ r O r 


















AAA7X3 




















046272 


126400 




1 1 AAV 


AAJL37A 


A» 57X7 


/VAiLA AA 


1 1 AAA 




A» 37X7 




1 1 AA^ 










AAA 'VI n 




AAA 7 ^9 






AAA071 














AA4LV3n 






1 1 AAA 


U403CC 


Al 37AA 
Ulc r W 




1 \ AA7 




Al 37A1 
VAC ■ wX 




\ t AAA 


AA&^V9 


Al 37A9 
vie t vc 


WW A V 


1 1 AAO 








HOW 




A773A9 
V ' CVC 




1 1 A01 




AAS7X7 


Wc^JO 


11892 


046 S46 


001002 




11893 


046350 


013721 


172516 


11894 


046354 


013721 


177576 


11895 


046360 


013721 


177574 


11896 


046364 


013721 


177572 


11897 


046370 


104417 




11898 


046372 








046372 


012637 


002102 


11899 


046376 


000207 
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UOOPS: SUBTST <<POUER FAIL UHILE RELOCATE0>> 



SEQ 0327 



{•SUBTEST 



POWER FAIL UHILE RELOCATED 



177776 

046612 
046614 



060024 
060026 



1*: 



2*! 



PUSH 

CLR 
HAP 

NOV 
CALL 
. OSABL 



BANK 

BANK 
BANK 

BANK.R3 
MAPPER 

CRF 



HOtf BANK.-CSP) 

tNAP SUPERVISOR SPACE (TEST AREA) TO BANK 

HOV RS.CSP) 



MOV (SP)*.RS 

: ENTER SUPERVISOR MODE 

:G0 TO SUPERVISOR HOOE 



SUPERVISOR 
BIS •6IT14.PSU 
.OSABL CRF 
MOV FIRST *PURVEC.UOOPSAV 

MOV FIRST »PURVEC»2.U00PSAV*2 

BMOV FIRST *U00PUP . UOOPSAV *4 . MOOPENO -UOOPUP/2 • 12 

JSR R5.BL0CK3 

UOOPENO • UOOPUP /2 * 1 2 . 

UOOPSAV •4 

FIRST •UOOPUP 

.OSABL CRF 
MOV •UOOPUP. FIRST* PUR VEC 

MOV •340.FIRST.PURVEC*2 

BMOV UOOPUP .FIRST » UOOPUP .UOOPENO -UOOPUP/2 
JSR R5.BL0CK3 
UOOPENO •UOOPUP/2 
FIRST*UOOPUP 
UOOPUP 
OSABL CRF 



MOV 
MOV 
MOV 
MOV 
SOB 
TST 
BNE 
MOV 
MOV 
MOV 
MOV 
KERNEL 
POP 

RETURN 



•KIPARO.RO 
•FIRST *UOOOENO.R1 
•8. .R2 
(R0)*.(R1'* 
R2.1* 
NOSUPER 
2t 

MriR3.(Rl). 
MMR2,CR1)» 
MMRl.(Rl). 
MMRO.CRl). 



BANK 



: ENTER KERNEL MODE 



MOV (SP)«.BANK 



CVMJA80 HSvii-j ngnoRy DI*G. 

POUCR TAIL U»'ILE RELOCATED 
11902 046400 



11903 046400 

11904 046404 

11905 046410 

11906 046414 

11907 046420 
11906 046422 

11909 046426 

11910 0464S0 

11911 0464S4 

11912 046436 

11913 046442 

11914 046446 

11915 046452 

11916 046456 

11917 046462 
046462 

11916 046466 

11919 046472 
046472 
046474 
046500 

046504 

11920 046506 
046506 



11921 
11922 
11923 
11924 
11925 
11926 
11927 
11926 
11929 
11950 
119S1 
1195r 

11953 
11954 
11957 



046514 
046522 



046550 
046554 
046540 
046544 
046546 

046550 

':;€552 

046552 
046556 
046562 
046612 



012700 
012701 
012705 
012702 
012021 
012725 
077204 
005757 
001002 
012057 
012057 
012057 
012057 
015706 

C15746 
005057 

010546 
015705 
004757 

012605 

052757 

013757 
015757 



012700 
012701 
012702 
012022 
077102 

104417 

012657 
000157 
000014 
000107 



046562 
172540 
172500 
000010 

077406 

002456 

172516 
177576 
177574 
177572 
046212 

002102 
002102 



002102 
05S604 



046612 
046614 



046616 

000105 
126400 



002102 
045654 



riACRO Y0S.02 Monday 07 -Oct B5 16:57 P*g« 576 

UOOPUP: SUBTST <<POUER UP FROn BANK 0 TO RCLOCATION>> 



SEQ 0328 



(♦SUBTEST 



POUER UP FROn BANK 0 TO RELOCATION 



1*: 



5*: 



040000 177776 



060024 

060026 



2i. 



MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
SOB 
TST 
BNE 
MOV 
MOV 
MOV 
MOV 
MOV 
PUSH 

CLR 
MAP 

MOV 
CALL 
. DSABL 



*WOOPENO.RO 

•KIPARO.Rl 

•KIPDR0.R3 

•6. .R2 

(R0)*.(R1)* 

•77406. (R3}* 

R2.1» 

NOSUPER 

5« 

(R0)» .MMR3 

(R0)».MMR2 

(R0)*.MMR1 

(RO)*.MMRO 

«SAVR6.SP 

BANK 

BANK 
BANK 

BANK.R3 

MAPPER 

CRF 



MOV BANK.-(SP) 

.MAP SUPERVISOR SPACE (TEST AREA) TO BANK 

MOV R5.-(SP) 



MOV (SP)..R5 

i ENTER SUPERVISOR MODE 

:G0 TO SUPERVISOR MODE 



SUPERVISOR 
BIS «eiT14.PSU 
. DSABL CRF 

MOV UOOPSAV. FIRST *PURVEC 

MOV U00PSAV*2. FIRST. PURVEC*2 

i SIMULATE THE FOLLOWING BLOCK MOV BUT UITH NO STACK ACCESSES 

sBMOV U00PSAV*4.<^IRST*U00PUP.U00PEND-U00PUP/2*12. 

MOV *U00PSAV*4,R0 

MOV •U00PEN0-U00PUP/2*12. .Rl 

MOV «FIRST* UOOPUP. R2 

MOV IR0)*.(R2)* 

SOB R1.2* 



KERNEL 
POP 

JMP 

UOOPEND: .REPT 
UOOPSAV:.REPT 



BANK 



(ENTER KERNEL MODE 



♦PURUP 
12. 

UOOPEND -UOOPUP/2* 12. ♦2 



MOV (SP)*.BANK 



CvnjASO nsvii-j 
10 SUBROUTINES 



11942 
11943 
11944 
11945 
11946 
11947 
11948 
11949 
11950 
11951 
11952 
119SS 
11954 
11955 
119S6 
11957 
1195a 
11959 
11960 
11961 
11962 
11963 
11964 
11965 
11966 
11967 
11965 
11969 
11970 
11971 
11972 
11973 
11974 
11975 
11976 
11977 



11978 
11979 
11980 
11981 
11982 
11983 
11984 
11985 
11986 
11987 
11988 
11989 
11990 
11991 
11992 

11993 
11994 
11995 



nEHORY OIAG. 
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.SBTTL 10 SUBROUTINES 
.SBTTL ROUTINE TYPE 



SEQ 0329 



1 •ROUTINE TO TYPE ASCIZ MESSAGE MESSAGE MUST TERMINATE WITH A 0 BYTE. 
;*THE ROUTINE UILL INSERT A NUMBER OF NULL CHARACTERS AFTER A LINE FEED. 



i*NOTEl: 
i*N0TE2: 
]*N0TE3; 
I* 

i*CALL: 
1*1) USING A 



INULL CONTAINS T-tE CHARACTER TO BE USED AS THE FILLER CHARACTER. 
«FILLS CONTAINS THE NUMBER OF FILLER CHARACTERS REQUIRED. 
*FILLC CONTAINS THE CHARACTER TO FILL AFTER. 



I* 

t*OR 

I* 

«• 



TYPE 



TRAP INSTRUCTION 
MESADR 



TYPE 
MESAOR 



047030 


105737 


002360 


• * 

ITYPE: 


TSTB 


♦TPFLG 


047034 


100407 






BMI 


61 








x« * 


nuv 




04 f 0*0 


Ul row 


WWUUUc 




nuw 


asr CD '> ot\ 








^9 i 


HflWR 
nuvD 


^ If W y ♦ » " 1 3~ / 










RMP 
one 


# » 










TQT 

tot 


V Or J ♦ 








39 Z 








UOC ' ID 




Dt i 


Ann 




U# rUOv 


VWWc 






RTT 

nix 




rUOc 








PMPR 


AHT TCP') 










RMF 


111 


047070 


112716 


000040 




MOVB 


,(SP) 


047074 


122716 


000200 


11*: 


CMPB 


♦CRLF.(SP) 


047100 


001006 






BNE 


8« 


047102 


005726 






TST 


(SP)* 


047104 








TYPE 




047104 


104401 






TYPEIT 










.OSABL 


CRF 


047106 


002660 






♦ CRLF 




047110 


105037 


047342 




CLRB 


ICHARCNT 


047114 


000753 






BR 


At 


047116 


004737 


047156 


8<: 


CALL 


1 TYPEC 


047122 


123726 


002652 


91: 


CMPB 


♦FILLC.(SP) 


047126 


001346 






BNE 


41 


047130 


013746 


002356 




MOV 


♦MULL.-(SP) 


047134 


105366 


000001 


101: 


OECB 


l(SP) 


047140 


002770 






BLT 


9» 


047142 


004737 


047156 




CALL 


♦TYPEC 


047146 


105337 


047342 




DECB 


tCHARCNT 


047152 


000770 






BR 


101 


047154 


000000 




XOCHAR: 


.UORO 0 




047156 






•TYPEC: 


PUSH 


Rl 


047156 


010146 








4(SP).R1 


047160 


116601 


000004 




MOVB 


047164 


005737 


002544 




TST 


CACHKN 


047170 


001402 






BEQ 


2t 



:. MESADR IS FIRST ADDRESS OF AN ASCIZ STRING 



ills THERE A TERMINAL? 
sBR IF NO 
it SAVE RO 

liGET ADDRESS OF ASCIZ STRING 

Si PUSH CHARACTER TO BE TYPED ONTO STACK 

stBR IF IT ISN'T THE TERMINATOR 

iilF TERMINATOR POP IT OFF THE STACK 

ssRESTORE RO 

1 s ADJUST RETURN PC 

! : RETURN 

I BRANCH IF NOT <HT> 

{REPLACE TAB UITH SPACE 
! .BRANCH IF NOT <CRLF> 

jiPOP <CR><LF> EQUIV 
i iTYPE A CR AND LF 



it CLEAR CHARACTER COUNT 

itGET NEXT CHARACTER 

jiGO TYPE THIS CHARACTER 

ills IT TIME FOR FILLER CHARS.? 

ti IF NO GO GET NEXT CHAR. 

I s GET • OF FILLER CHARS. NEEDED 

iiANO THE NULL CHAR. 

iiOOES A NULL NEED TO BE TYPED? 

iiBR IF NO- -GO POP THE NULL OFF OF STACK 

1 1 GO TYPE A NULL 

1 1 DO NOT COUNT AS A COUNT 

siLOOP 



MOV Rl.-(SP) 



CVMJA80 MSVIX-J MEMORY OIAG. 
ROUTINE TYPE 
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SEQ 0330 



11996 
11997 

11996 
12023 
12024 
12025 
12026 
12027 
12026 
12029 
120S0 
12031 
12032 
12033 
12034 
1203S 
12036 



12037 
12036 



12039 
12040 

12041 
12045 
12046 
12047 
12046 
12049 
12050 
12051 
12052 
12053 

12054 
12055 
12056 

12057 

12056 
12059 



047172 
047172 
047176 
047176 
047200 
047202 
047206 
047210 
047214 
047220 
047222 
047230 
047236 
047244 
047246 
047252 
047254 
047262 
047270 
047270 
047276 
047300 
047302 
047302 
047304 
047304 
047306 
047306 
047306 
047312 
047320 
047322 
047326 
047330 
047336 
047340 
047342 
047344 
047344 
047346 
047352 
047354 
047354 
047360 
047360 
047362 
047364 



013746 177746 



010046 
104424 

105777 
100375 
005037 
105777 
100032 
117737 
042737 
023727 
001020 
105777 
100375 
117737 
042737 



012601 
000207 



133440 

047154 
133422 

133416 
177600 
047154 

133370 

133364 

177600 



2«: 



3«: 



PUSH 
PUSH 



CONTRL 
RO 



CACHOFF 

TSTB 8«TPS 



047154 
047154 

000023 



047154 
047154 



BPL 3« 
CLR 
TSTB 
BPL 
MOVB 
BIC 
CMP 
BNE 

C0NTS3: TSTB 
BPL 
MOVB 
BIC 



XOCHAR 
8«TKS 
NC 

81 TKB. XOCHAR 
♦tC177, XOCHAR 
XOCHAR, «023 
NC 

8ITKS 
C0NTS3 

8ITKB. XOCHAR 
♦tC177. XOCHAR 



IF XOCHAR EQ «21 



C23727 


047154 


000021 








001002 












000402 








BR 


NC 










ELSE 




000401 












000760 








BR 


C0NTS3 








END lOF 


IF XOCHAR 


110177 


133336 




NC: 


MOVB 


R1.8«TPB 


122766 


000015 


000002 




CMPB 


♦CR.2CSP) 


001003 








BNE 


11 


105037 


047342 






CLRB 


tCHARCNT 


000406 








BR 


tTYPEX 


122766 


000012 


000002 


It: 


CMPB 


♦LF.2CSP) 


001402 








BEQ 


tTYPEX 


105227 








INCB 


CPC)» 


000000 






tCHARCNT: .WORD 


0 






ITYPEX: 


POP 


RO 


012600 










CACHKN 


005737 


002544 






TST 


001402 








BEQ 


2t 








POP 


CONTRL 


012637 


177746 






POP 


Rl 






21: 



{TURN CACHE OFF 

I (WAIT UNTIL PRINTER IS READY 

I J CHECK FOR XOFF 

I iSKIP IF NO CHARACTER 

It SAVE THE CHARACTER 

I I STRIP OFF ASCII 

II WAS IT A CONTROL S? 
I {BRANCH IF NOT 
iiUAIT FOR CHARACTER 

:iGET CHARACTER 
i I STRIP OFF ASCII 
:i IF IT IS A tQ 



MOV CONTRL. -(SP) 
MOV RO.-(SP) 



CMP XOCHAR. #21 
BNE L436 



BR L437 
L436: i ; I : t i 



L437 * * : t i • i 
::LOAD CHAR TO BE TYPED INTO DATA* REG. 
iilS CHARACTER A CARRIAGE RETURN? 
s i BRANCH IF NO 

j;YES--CLEAR CHARACTER COUNT 
t:EXIT 

j:IS character A LINE FEED? 

J ; BRANCH IF YES 

: (COUNT THE CHARACTER 

5 (CHARACTER COUNT STORAGE 



:IS THERE A CACHE? 
(BRANCH 1^ NOT 
(POP CACHE STATUS 



MOV (SP)».RO 



RETURN 

SUPLIMIT :(!!!!!!!!!!!! THIS IS 



MOV (SP)». CONTRL 
MOV CSP)».Rl 
THE LIMIT ON SUPERVISOR MAPPED TO MUT SPACt 



CVMJABO MSVll-J MEMORY OIAG. 
ERROR DATA SETUP 

12737 
12758 
12759 
12740 
12741 
12742 
12745 
12744 
12745 
12746 
12747 
12748 
12749 
12750 
12751 
12752 
12753 
12754 
12755 
12756 
12757 
12756 
12759 
12760 
12761 
12762 
12763 
12764 
12765 
12766 
12767 
12768 
12769 
12770 
12771 
12772 
12773 
12774 
12775 
12776 
12777 
12778 
12779 
12780 
12781 
12782 
12783 
12784 
12785 
12786 
12787 
12788 
12789 
12790 
12791 
12792 
12793 
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.SBTTL 
USE THIS 
PERROl 

PERR02 

PERR05 
PERR04 

PERR05 

PERR06 



PERR07 



PERRIO 



PERRll 



PERR12 



PERR13 



ERROR DATA SETUP 

IF THIS CONDITION OISCRIBES THE ERROR 
TRAP 

BAD DATA IN RO UNLESS ABORTED 

THEN BAD DATA IS POINTED TO BY •(R4) 
GOOD DATA IN RS 

TRAP 

BAD DATA IN Rl UNLESS ABORTED 

THEN BAD DATA IS POINTED TO BY -(R4) 
GOOD DATA IN R2 

TRAP 

BAD DATA IS POINTED TO BY -(Rl) 
GOOD DATA IN R4 

TRAP 

BAD DATA IN R4 UNLESS ABORTED 

THEN BAD DATA IS POINTED TO BY -2(R0) 
GOOD DATA IN R2 

JSR PC 

BAD DATA IS POINTED TO BY -(RO) 
GOOD DATA IN R2 

RETURN AFTER SETTING UP GOOD. BAD. ADDRESS 
JSR PC 

BAD DATA IS POINTED TO 3Y -(RO) 
GOOD DATA IS ZERO 

RETURN AFTER SETTING UP GOOD. BAD. ADDRESS 
TRAP 

BAD DATA IN R2 UNLESS ABORTED 

THEN BAD DATA IS POINTED TO BY (Rl) 
GOOD DATA IN DATBUF 

TRAP 

BAD DATA IN R2 UNLESS ABORTED 

THEN BAD DATA IS POINTED TO BY 2(R1) 
GOOD DATA IN DATBUF ^2 

TRAP 

BYTE TEST 

BAD DATA IN RIGHT BYTE OF RO UNLESS ABORTED 
THEN BAD DATA IS POINTED TO BY (Rl) 
GOOD DATA IS A ZERO BYTE 

TRAP 

BYTE TEST 

BAD DATA IN RIGHT BYTE OF RO UNLESS ABORTED 
THEN BAD DATA IS POINTED TO BY (Rl) 
GOOD DATA IS A BYTE OF ONES 

TRAP 

BAD DATA IN RO UNLESS ABORTED 



CvnjABO nsvii-J MEnOftY OIAG. 
ERROR DATA SETUP 



12794 
12795 
12796 
12797 
12798 
12799 
12600 
12001 
12802 
12803 
12804 
12805 
12806 
12807 
12808 
12809 
12810 
12811 
1<812 
1281S 
12814 
12815 
12816 
12817 
12818 
12819 
12820 
12821 
12822 
12823 
12824 
12825 
12826 
12827 
12828 
12829 
12830 
12831 
12832 
12833 
12834 
12835 
12836 
12837 
12838 
12839 
12840 
12841 
12842 
12843 
12844 
1284S. 
12846 
12847 
12848 
12849 
12850 



riACRO Y05.02 Monday 0 



PERR14 



>4 



PERR15 



PERR16 



PERR17 



PERR20 



PERR21 



PERR22 



PERR23 



PERR24 



PERR25 



PERR26 
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SEQ 0332 

THEN BAD DATA IS POINTED TO BY (Rl) 
GOOD DATA IS ZERO 

TRAP 

BAD DATA IN RO UNLESS ABORTED 

THEN BAD DATA IS POINTED TD BY (Rl) 
GOOD DATA IS ONES 

TRAP 

BAD DATA IN RO UNLESS ABORTED 

THEN BAD DATA IS POINTED TO BY (Rl) 
GOOD DATA IN TSTDAT 

TRAP 

BAD DATP IN RO UNLESS ABORTED 

THEN BAD DATA IS POINTED TO BY (Rl) 
GOOD DATA IN TSTDAT «2 

TRAP 

BAD DATA IN RO UNLESS ABORTED 

THEN BAD DATA IS POINTED TO BY (Rl) 
GOOD DATA IN R2 

TRAP 

BAD DATA IN RO UNLESS ABORTED 

THEN BAD DATA IS POINTED TO BY (Rl) 
GOOD DATA IN R3 

TRAP 

7 BIT BYTE TEST 

BAD DATA IN RIGHT BYTE OF RO UNLESS ABORTED 
THEN BAD DATA IS POINTED TO BY (Rl) 
GOOD DATA IS A 7 BIT BYTE ON ONES 

TRAP 

BAD DATA IN R2 UNLESS ABORTED 

THEN BAD DATA IS POINTED TO BY (Rl) 
GOGO DATA IN RO 

TRAP 

BAD DATA IN RO UNLESS ABORTED 

THEN BAD DATA IS POINlcD TO BY (Rl) 
GOGO DATA IN R4 

TRAP 

BAD DATA IN RO UNLESS ABORTED 

THEN BAD DATA IS POINTED TO BY (R2) 
GOOD DATA IN R3 

TRAP 

BAD DATA POINTED TO BY -(Rl) 

GOOD DATA IN R2 UNLESS LOC V177654 IS SET 

THEN GOOD DATA IS IN R3 



BAD DATA IS DOUBLE UORD POINTED TO BY Rl AND IN LOU 7 BITS OF RO 
GOOD DATA IS 000000. .100000. .100 



CVnjABO MSVll-J nEflWY OIAG. 
ERROR DATA SETUP 

12851 
12852 
12853 
12854 
128SS 
12856 
12857 
12858 
12859 
12860 
12861 
12862 
12863 
12864 
12865 
12866 
12867 
12868 
12869 
12870 
12871 
12872 
12873 
12874 
12875 
12876 
12877 
12878 
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SEQ " 



PERR27 

PERR30 

PERR31 
PERR32 
PERR33 
PERR34 
PERR35 



TRAP 

BAD DATA IS DOUBLE WORD POINTED TO BY Rl AND IN LOW 7 BITS OF RO 
GOOD DATA IS 000000. .000000. .077 

TRAP 

BAD DATA IS POINTED TO BY -16(SP} 
GOOD DATA IS IN Rl 

TRAP 

SPECIAL ECC FAILURE HANDLER 
TRAP 

SPECIAL ECC FAILURE HANDLER 
TRAP 

SPECIAL ECC FAILURE HANDLER 
TRAP 

SPECIAL ECC FAILURE HANDLER 
TRAP 

SPECIAL BRANCH GOBBLE FAILURE HANDLER 



CALLING SEQUENCE FOR TRAP TYPES 

BEQ 2t iNO - ERROR. BRANCH FOR CARD 

PERRXX sTRAP TO ERROR ROUTINE 

i2t: NEXT INSTRUCTION i CONTINUE TESTING 



CVMjAaO MSVll-J MEMORY OIAG. 
EftPCM DATA SETUP 
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SEQ 0334 



12881 
12882 
1288S 
12684 
12665 
12866 
12867 
12866 
12869 
12690 
12691 
12692 
1269S 
12694 
12695 
12696 
12697 
12696 
12699 
12900 
12901 
12902 
1290S 
12904 
12905 
12906 
12907 
12906 
12909 
12910 
12911 
12912 
12913 
12914 
12915 
12916 
12917 
12916 
12919 
12920 



12921 

12922 

12923 
12924 
12925 

12926 

12927 

12928 
12929 
12930 



047364 
047370 
047376 
047402 
047406 

047412 
047416 
047424 
047430 
047434 

047440 
047444 
047452 
047456 
047464 

047470 
047474 
047502 
047506 
047512 

047516 
047522 
047526 
047532 
047536 
047542 

047544 

047550 

047552 
047556 
047562 
047570 

047574 
047574 
047600 
047606 
047606 
047612 
047612 
047620 

047624 
047624 
047630 
047630 
047634 
047634 
047640 

047644 



010437 
162737 
010037 
010537 
000137 

010437 
162737 
010137 
010237 
000137 

010137 
162737 
010437 
016137 
000137 

010037 
162737 
010437 
010237 
000137 

010237 
014037 
010037 
062700 
004737 
000207 

005037 
000764 

010137 
010237 
013737 
000137 



010137 
062737 



013737 
000137 



010137 

010037 

005037 
000137 



002034 
000002 
002052 
002044 
050120 

002034 
000002 
002052 
002044 
050120 

002034 
000002 
002044 
177776 
050120 

002034 
000002 
002052 
002044 

050120 

002044 

002052 
002034 
000002 
034040 



002044 



002034 
002052 
002242 
050120 



002034 
000002 



010237 002052 



002244 

050120 



002034 

002052 

002044 
050172 



002034 

002034 

00203^ 
002052 

002034 



IPEROl : 



$PER02: 



$PER03: 



$PER04: 



PERROS : 
PERA05: 



MOV R4. ADDRESS 
SUB •2 . ADDRESS 
MOV RO.BAD 
MOV R5.G00D 
JMP PERRAU 

MOV R4 . ADDRESS 

sue •2. ADDRESS 
MOV Rl.BAD 
MOV R2,G00D 
JMP PERRAU 

MOV Rl. ADDRESS 
SUB «2 . ADDRESS 
MOV R4.G00D 
MOV -2(R1).BAD 
JMP PERRAU 



MOV 
SUB 
MOV 
MOV 
JMP 

MOV 

MOV 

MOV 

ADD 

CALL 

RETURN 



PERR06 : 
(PER07: 



002044 



002034 



002044 



CLR 
BR 

MOV 
MOV 
MOV 
JMP 



RO. ADDRESS 
•2, ADDRESS 
R4.BAD 
R2.G00D 
PERRAU 

R2.G00D 
-(RO).BAD 
RO. ADDRESS 
•2.R0 
BADSTACK 



GOOD 
PERAOS 

Rl. ADDRESS 
R2.BAD 
DATBUF.GOOO 
PERRAU 



{RESTORE RO 



IPERIO: LET ADDRESS : - Rl * *2 

LET BAD :- R2 

LET GOOD :- DATBUF*2 

JMP PERRAU 
IPERll: LET ADDRESS :- Rl 

LET BAD :- RO 

LET GOOD :- #0 

JMP PERRAB 
$PER12: LET ADDRESS :- Rl 



MOV Rl. ADDRESS 
ADD *2. ADDRESS 

MOV R2.BAD 

MOV 0ATBUF*2.GOOO 

MOV Rl. ADDRESS 
MOV RO.BAD 

CLR GOOD 



cvnjABO nsvii-j memory OIAG. 

ERROR DATA SETUP 



047644 

12931 047650 
047650 

12932 047654 
047654 

12933 047662 



010137 

010037 

012737 
000137 



002034 
002052 

000377 
050172 
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002044 



LET BAD :- RO 
LET GOOD :- «377 
JMP PERRAB 



MOV Rl. ADDRESS 
MOV RO.BAO 
MOV *377.GOOO 



SEQ 0335 



CVMJAaO nsvii J MEnOAY DIAG. 
EBBW DATA StTUP 



129M 

129S7 

129M 

12939 
12940 
12941 

12942 

1294S 

12944 
1294S 
12946 

12947 
12946 

12949 

12950 
129S1 

12952 

12955 

12954 
12953 
12956 

12957 

1295a 

12959 
12960 
12961 

12962 

12963 

12964 
12965 
12966 

12967 

12966 

12969 
12970 
12971 



047666 
0<"666 
04 .72 
047672 
047676 
047676 
047702 

047706 
047706 
047712 
047712 
047716 
047716 
047724 

047750 
047750 
047754 
047754 
047740 
047740 
047746 

047752 
047752 
047756 
047756 
047762 
047762 
047770 

047772 
047772 
047776 
047776 
050002 
050002 
050006 

050010 
050010 
050014 
050014 
050020 
050020 
050024 

050026 
050026 
050052 
050052 
050056 
050056 
050044 

050046 



010137 

010037 

005057 
000137 

01C137 

010057 

015757 
000157 

010157 

C10057 

013737 
000157 

010157 

010057 

015757 
000455 

010137 

010057 

010257 
000444 

010157 

010057 

010357 
000455 

010157 

010057 

012757 
000477 



002034 
002052 

002044 
050120 

002034 
002052 

002614 
050120 

002054 

002052 

002246 
050120 

002054 

002052 
002250 

002034 
002052 
002044 

002054 
002052 
002044 

002054 
002052 
000177 



002044 



002044 
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•PER15: LET AODftCSS :- Rl 
LET BAD :- RO 
LET GOOD :- 40 
JtiP PERRAU 
•PERU: LET ADDRESS :- Rl 
LET BAD :- RO 
LET GOOD :- ONES 
JMP PERRAU 
tPERlS: LET ADDRESS :- Rl 
LET BAD :- RO 
LET 6000 :- TSTDAT 
JtiP PERRAU 
*PER16: LET ADDRESS :- Rl 
LET BAD :- RO 
LET GOOD :- TSTDAT* 2 
BR PERRAU 
tPERl7: LET ADDRESS :- Rl 
LET BAD :- RO 
LET GOOD :- R2 
BR PERRAU 
»PER20: LET ADDRESS :- Rl 
LET BAD :- RO 
LET GOOD :- R5 
BR PERRAU 
*PER21: LET ADDRESS :- Rl 
LET BAD :- RO 
LET GOOD #177 
BR PERRA7 
«PER22: LET ADDRESS :- Rl 



002044 



002044 



SEQ 0336 

nOV Rl. ADDRESS 
nOV RO.BAO 
CLR GOOD 

nOV Rl. ADDRESS 
nOV RO.BAO 
nOV ONES. GOOD 

nOV Rl.AOORESS 

nOV RO.BAO 

NOV TSTDAT. GOOD 

NOV Rl. ADDRESS 

NOV RO.BAO 

NOV TSTDAT *2. GOOD 

NOV Rl. ADDRESS 
NOV RO.BAO 
NOV R2.G000 

NOV Rl. ADDRESS 
NOV RO.BAO 
NOV R5.G000 

NOV Rl. ADDRESS 
NOV RO.BAO 
NOV *177.G000 



CvnjA80 nsvii-j rcnORY DXAG. 

ERROR DATA SETUP 



0S004« 
12972 050032 

050052 
12975 050056 

0500S« 
12974 0S0062 
12975 

1297« 0S00«4 
050064 

12977 050070 
050070 

12978 050074 
050074 

12979 050100 
12960 

12961 050102 
050102 

12962 050106 
0S0106 

1296S 050112 
0S0112 
12964 050116 



010137 

010237 

010037 
000416 

0101S7 

010037 

010437 
000407 

0102S7 

0100S7 

010SS7 
000400 



002034 
002052 
002044 

002034 
002052 
002044 

0020S4 
002052 
002044 
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LET BAD :- R2 

LET GOOO :- RO 

BR PERRAU 
$PER23: LET ADDRESS :> Rl 

LET BAD :- RO 

LET GOOO :- R4 

BR PERRAU 
IPER24: LET ADDRESS :• R2 

LET BAD :- RO 

LET GOOO :- RS 

BR PERRAU 



nOV Rl. ADDRESS 
nOV R2.BA0 
nOV RO.GOOD 

tlOV Rl. ADDRESS 
nOV R0.6AD 
flOV R4.G000 

nOV R2. ADDRESS 
nOV RO.BAO 
NOV RS.GOOD 



CVMJA80 MSVll J MEMORY OIAG. 
ERROR DATA SETUP 
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SEQ 0558 



12986 


050120 






12987 


050120 


004757 


050554 


12988 


050124 








050124 


005757 


002144 




050150 


001402 






050152 


004737 


045160 




050156 






12989 


050156 








050156 


005757 


002022 




050142 


001002 






050144 


004757 


054040 




C50150 






12990 


050150 


004737 


050330 


12991 


050154 








050154 


005737 


002144 




0^0160 


001002 




12992 


050162 


104011 














050164 


000401 






050166 






12994 


050166 


104012 




12995 


050170 








050170 






12«96 


050170 


000002 




12997 








12996 


050172 







12999 


050172 


004757 


050354 


15000 


050176 








050176 


005737 


002144 




050202 


001402 






050204 


004737 


045160 




050210 






ISOOl 


050210 








050210 


005737 


002022 




0502X4 


001002 






050216 


004737 


034040 




050222 






15002 


05022^ 


004757 


050330 


13005 


050226 








050226 


005737 


002144 




050252 


0010v._ 




15004 


050254 


104014 




15005 


050256 
050236 
050240 


000401 




15006 


050240 


104015 




15007 


050242 
050242 






15008 


050242 


000002 





PERRAU: SUBTST <<DATA UAS A UORO>> 



i*SUeTEST 



DATA UAS A UORO 



CALL PERBNK 

IF ABORTFLAG IS TRUE THEN (CALL GETOATA 



IF BAOPC EQ #0 THEN tCALL BAOSTACK 



CALL PEPXOR 

IF ABORTFLAG IS FALSE 



ERROR *11 
ELSE 



ERROR *12 
END iOF IF ABORTFLAG 

RTI 

PERRAB: SUBTST <<DATA UAS A BYTE>> 



TST ABORTFLAG 
BEQ L440 
JSR PC. GETOATA 
L440: 1 1 i I > t 

TST BAOPC 
BNE L441 
JSR PC. BAOSTACK 
L441: i I i i 1 1 



TST ABORTFLAG 
BNE L442 



BR L443 
L442: 1 1 i > > t 



L443: 1 1 i i t i 



(•SUBTEST 



DATA UAS A BYTE 



CALL PERBNK 

IF ABORTFLAG IS TR<.€ THEN (CALL GETOATA 



IF BAOPC EQ M THEN ICALL BAOSTACK 



CALL PERXOR 

IF ABORTFLAG IS FALSE 



ERROR •14 
ELSE 



ERROR •15 
END :0F IF ABORTFLAG 

RTI 



TST AeORTFLAG 
KQ L444 

JSR PC. GETOATA 
L444 : 1 . i 1 1 1 

TST BAOPC 
BNE L445 
JSR PC. BAOSTACK 
L44S: I i I i I ( 



TST ABORTFLAG 
BNE L446 



BR L447 
L446: 1 1 i 1 1 i 



L447 : 1 1 ( i i s 



CVHJASO HSVll J MCnORV OIAC. 
DATA WAS A BYTE 
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13011 


950244 






isou 


050244 








050244 


005737 


002022 




050250 


001002 






0502S2 


004737 


034040 




050256 






13013 


050256 


004737 


050SS0 


13014 


050262 


004737 


050354 


13015 


050266 


104022 




13016 


050270 


000002 




13017 








13018 


050272 








050272 


012737 


100000 


15019 


050300 










Vie ' 3 ' 


AAA1 AA 


13020 


050306 


000137 


044746 


13021 








13022 


050312 


005037 


002046 


13023 


050316 








050316 


012737 


000077 


13024 


050324 


000137 


044746 


13025 








13026 


050330 







13027 050330 
050330 

13028 050332 

13029 050336 

13030 050544 

13031 050S50 
050350 

13032 050352 



010046 

013700 
013737 
074037 

012600 
000207 



002044 

002052 
002060 



002046 

002050 

002050 



002060 



SEQ 0S39 



PERI)A7: SUBTST 



{•SUBTEST 



<<OATA UAS A 7 BIT BYTE>> 
DATA UAS A 7 BIT BYTE 



IF BAOPC EQ 90 THEN tCALL BAOSTACK 



CALL 
CALL 
ERROR 
RTI 



PERXOR 
PERBNK 
•22 



IPER26: LET G0002 :- «100000 

LET G0003 :- «100 

jnP PERRA3 

IPER27: CLR G0002 

LET G0003 :- ^077 

jnP PERRA3 

PERXOR: SUBTST <<OETERniNE XOR OF GOGO £ BAO>> 
!*SUBTEST DETERMINE XOR OF GOOD C BAD 

RO 



TST BAOPC 
BNE L450 
JSR PC. BAOSTACK 
L4S0: test: 



nOV *100000.G0002 
nOV •100.G0003 



PUSH 

riOV 
nov 
XOR 
POP 

RETURN 



GOOO.RO 
BAD.BAOXOR 
RO.BAOXOR 
RO 



nov •O77.GO00S 



nov RO.-(SP) 



nov (SP)».RO 



CVMJA80 MSVll J MEMORY OI»G. 
OeTERMINC XOR Of GOOD £ BAD 

130S5 0S0554 



ISO 36 



15037 


050354 




050354 


010046 




0505S6 


010146 


1S0S8 


0SOS6O 


01S701 


1S0S9 


050564 


006301 


19040 


050366 


006301 


19041 


050370 


052761 


19042 


050376 


105261 


19045 


050402 


001002 
10:S61 


13044 


050404 


19045 


050410 


126137 


13046 


050416 


10140S 


13047 


050420 






050420 


0127S7 


13048 


050426 






050426 


012601 




0504 SO 


012600 


13049 


0504 32 


000207 


13050 






13051 


050434 


010037 


13052 


050440 






050440 


023737 




050446 


001004 


13053 


050450 


01S7S7 


13054 


050456 






050456 


000403 




050460 




13055 


050460 


013737 


13056 


050466 
050466 




13057 


050466 


004737 


13056 


050472 






050472 


012737 


13059 


050500 


000207 


13060 






13061 


050502 






050502 


023727 




050510 


001001 


13062 


050512 


104023 


13063 


050514 
050514 




13064 


050514 






050514 


0057S7 




050520 


001002 




050522 


0047S7 




050526 




13065 


050526 


004737 


13066 


050532 






0505S2 


023727 




050540 


001001 


13067 


050542 


104037 


13066 


050544 





002052 
002034 
002246 



050330 
177777 
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PERBNK: SUBTST<<LOG ERROR ON BAD BANK>> 



SEQ 0340 



i*SUBTEST 



LOG ERROR ON BAD BANK 



;UHILE UE'RE HERE LET'S MARK THE BAD BANK IN THE CONFIGURATION TABLE 
PUSH RO.Rl 



002102 






MOV 


BANK.Rl 










ASL 


Rl 










ASL 


Rl 




000001 


002664 




BIS 


•BITO.CONFIG(Rl) 




002666 






INCB 


C0NFIG*2(R1) 


iBUr«> BANK COUNTER 








BNE 


121 


:N0 OVERFLOW SKIP 


002666 






OECB 


C0NriG*2(Rl) 


sSET BACK TO 255. 


002666 


002554 


12*: 


CMPB 


C0NFIG*2(Rl).ERRnAX 


;IS IT PAST MAX? 








BLOS 


11» 


iNO • SKIP 








SET 


TOOHANY 


;YES 


177777 


002406 














11»: 


POP 


Rl.RO 





002412 
002044 



002250 002044 



RETURN 

PERECC: MOV RO.BAD 

IF ADDRESS EQ TESTADO 



MOV TSTDAT.GOOD 
ELSE 



MOV TSTDAT.2.G00D 
END jOF IF (Rl) 



002612 



CALL 
SET 



PERXOR 
HEADER 



L452: 



002300 000041 



002022 
034040 
050434 

002300 000011 



RETURN 

tPERSl: IF REALPAT EQ Ml 
ERROR •23 



END 

IF BADPC EQ 90 THEN »CALL BADSTACK 



CALL PERECC 
IF REALPAT EQ #11 



ERROR »37 
END J OF IF REALPAT 



L453: 



MOV RO. (SP) 
MOV Rl. (SP) 



MOV « l.TOOMANi 

MOV (SP)..R1 
MOV (SP)..RO 



CMP A00RE5S. TESTADO 
BNE L451 



BR L452 
L451 : ; ; J ; : ; 



MOV • 1. HEADER 



CMP REALPAT. Ml 
BNE L453 



TST BAOPC 
BNE L454 
JSR PC. BADSTACK 
L454: a ; J ; ; ; 



CMP REALPAT. #11 
BNE L455 



cvnjABo Msvii J renosY oiag. macro yo5.02 

LOG EPROR ON BAD BANK 

050544 
15069 050544 

050544 023727 002300 OOOOlS 
050552 OOlOOl 

13070 050554 104043 

13071 050356 
050556 

13072 0SOSS6 

050556 023727 002300 000016 
050564 001001 

13073 050566 104044 

13074 050570 
050570 

13075 050570 

050570 012737 177777 002612 

13076 0SOS76 000002 



Monday 07 Oct 65 16.57 

IF REALPAT EQ •IS 

ERROR •43 
END J OF IF REALPAT 

IF REALPAT EO *16 

ERROR •44 
END :0F IF REALPAT 

SET HEADER 

RTI 



L4S5: I 1 1 I i i 



CMP REALPAT. #15 
BNE L4S6 



L456: > { i I i > 



CMP REALPAT. •16 
BNE L457 



L4S7 : i 1 1 1 1 i 

MOV ••1. HEADER 



CVMJABO MSVll-J MEMORY DIAG. 
COG ERROR ON BAD BANK 



15079 



13060 

isoai 

13062 
13063 

13064 
15065 

13066 
13067 
13066 



13069 
13090 
13091 
13092 
13093 
13094 

13095 
13096 

13097 
13098 
13099 



13100 



13101 
13102 



13103 
13104 

13105 
13106 
13107 
13106 
13109 
13110 
13111 
13112 
13113 
13114 



050600 
050600 
050604 
050606 
050612 
050612 
050616 
050622 
050626 
050626 
050634 
0S06S6 
050696 
050644 

050646 
050646 
050652 
050654 
050660 
050660 
050664 
050670 
050674 
050702 
050706 
050706 
050714 
050716 
050716 
050724 

050726 
050726 
050732 
050734 
050740 
050740 
050740 
050746 
050750 
050752 
050752 
050754 
050754 
050756 
050756 
050756 



050760 
050764 
050770 
050776 
051004 
051006 
051012 



005737 
001002 
004737 

010137 
010037 
010237 

012737 
104040 

012737 
000002 



005737 
001002 
004737 

010137 
010037 
105037 
012737 
004737 

012737 
104041 

012737 
000002 



005737 
001002 
004737 



032737 
001002 
104016 

000401 

104001 

000002 



004737 
004737 
013737 
012737 
104047 
062706 
000207 



002612 



002612 



002022 

034040 

002034 
002052 
002044 

177777 
177777 

002022 

034040 

002034 
002052 
002053 
000377 
050330 

177777 
177777 

002022 
034040 

100020 002150 



MACRO Y05.02 Monday 07-0ct-85 16:57 Pag* 404 

(P'.R32: If BADPC EQ M THEN $CALL BAOSTACK 



SEQ 0342 



MOV 
MOV 
MOV 
SET 

ERROR 
SET 

RTI 



Rl. ADDRESS 
RO.BAD 
R2.G00D 
HEADER 

*40 

HEADER 



L460: 1 ) i i > s 



TST BADPC 

BNE L460 

JSR PC.BADSTACK 



MOV HEADER 
MOV A-l. HEADER 



IPERSS: IF BADPC EQ M THEN $CALL BADSTACK 



002044 



002612 



002612 



MOV 

MOV 

CLRB 

MOV 

CALL 

SET 

ERROR 

SET 

RTI 



Rl. ADDRESS 

RO.BAD 

BAD*1 

•377. GOOD 

PERXOR 

HEADER 

*41 

HEADER 



L461:;!!j; 



TST BADPC 

BNE L461 

JSR PC.BADSTACK 



*PER34:IF BADPC EQ «0 THEN *CALL BADSTACK 



IF «BIT15!BIT4 OFF. IN CSR 



ERROR *16 
ELSE 



ERROR *1 
END (OF IF «BIT15!BIT4 

RTI 



L462: 



MOV «-l. HEADER 
MOV d-l. HEADER 



TST BADPC 

BNE L462 

JSR PC.BADSTACK 



:N0 SBE OR DBE 



L463: 

s EXPECTED SBE SO DBE 
L464: 



BIT «eiT15!BIT4.CSR 
BNE L463 



BR L464 
MUST 'have GOTTEN SET 



t DURING BRANCH GOBBLE THE CONDITION CODES UERE URONG 

050354 tPER35: CALL PERBNK 

034040 CALL BADSTACK 

002032 002052 MOV BADPSU.BAD 

000012 002044 MOV •12. GOOD 

ERROR *47 

000004 ADO M.SP sFIX STACK FROM TRAP 

RETURN {ABORTING TEST 



CVMJABO MSVll-J MEMORY OIAG. 
LOG ERROR ON BAD BANK 



MACRO YDS. 02 Monday 07 -Oct -85 16:57 P«9« 404 1 



13115 
13116 
13117 

isiia 

13119 
13120 

13121 
15122 
13123 
13124 
13125 
13126 
13127 



051014 010037 002044 

051020 010137 002052 
051024 

051024 012737 177777 002612 

051032 104023 

051034 

051034 012737 177777 002612 

051042 000002 

051044 104053 

051046 000002 

OS 1050 104054 

051052 000002 



*PER36: MOV 
MOV 
SET 

ERROR 
SET 

RTI 

*PER37: ERROR 
RTI 

>PER40: ERROR 
RTI 



RO.GOOO 

Rl.BAO 

HEADER 

*23 

HEADER 



► 53 



♦ 54 



SEQ 054S 



MOV • 1. HEADER 
MOV t-l. HEADER 



:ILC>iREV B 
;ILCjjREV B 

:ILC:iREV B 
iILCiiREV B 



cvMjABO nsvii-j nenosY oiag. 

ROUTINE SCOPE HANDLER 



13130 
13131 
13132 
13133 
13134 
13135 
13136 
13137 
1313a 
13139 
13140 



13141 
13142 
1S14S 

13144 
13145 
13146 

13147 
13148 
13149 
13150 
13151 
13152 
13153 
13154 
13163 



13164 
13165 
13166 

13167 



13166 
13169 

13170 



13171 
13172 
13173 
13174 
13175 
13176 
13177 
13178 
13179 
13160 
13181 
13182 



051054 
051060 
051060 
051062 
051066 
051072 
051072 
051072 
051074 
051100 
051102 
051106 
051106 
051112 
051114 
051122 
051130 
051132 
051134 
051134 
051140 
051142 
051150 
051152 
051156 
051162 
051162 
051162 
051162 
051166 
051170 
051172 
051172 
051172 
051172 
051200 



005237 056726 



051204 
051210 
051216 
051222 
051226 
051230 
051234 
051242 
051244 



002004 
005037 
105237 



104410 

005737 
001402 
C04737 

005737 
001410 
013737 
032737 
001401 
104177 

005737 
001410 
032777 
001404 

005037 
000137 



005737 
001401 
000002 



032777 
001051 



051202 000425 



013746 
012737 
005737 
012637 
000430 
062706 
022737 
001002 
005037 



000004 
051230 
177060 
000004 

000004 
000005 

177766 
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.SBTTL ROUTINE SCOPE HANDLER 



SEQ 0S44 



•THIS ROUTINE CONTROLS THE LOOPING OF SUBTESTS. IT WILL INCREMENT 
*AND LOAD THE DISPLAY DATA INTO THE DISPLAY REGISTER 
*THE SUITCH OPTIONS PROVIDED BY THIS ROUTINE ARE: 
*SU14-1 LOOP ON TEST 

*SU9-1 LOOP ON ERROR 
*CALL 

♦ SCOPE 
I SCOPE: INC »DEVCT 
IF RESULT IS LT 



J sSCOPE-IOT 

J TELL 



APT UE ARE ALIVE 



BGE L465 



056726 
056730 



006304 

055222 

052364 

177766 
000001 

002420 

000400 

002420 
040512 

002440 



040000 131436 



NOTRCE: 



052362 
052362 



131466 



SKJ: 



CLR 
INCB 
END iOF 

CKSUR 
TST 
BEQ 
CALL 

TST 
BEQ 
MOV 
BIT 
BEQ 
ERROR 



♦DEVCT 

«UNIT 

IF RESULT 



TRACE 

NOTRCE 

CONTT 

CPERRF 
SKJ 

8«177766.CPSAVE 
«flIT0.CPSAVE 

SKJ 
► 177 



I (TEST FOR CHANGE IN 



L465 : : I s { : t 
SOFT-SUR 



; REPORT IF SO 
IF STOPOK IS TRUE AND «SU8 SET. IN 8SUR 



I TRACE 

tIS THERE A CPU ERROR REGISTER? 
] BRANCH IF NOT 

I GET CONTENTS OF ERROR REGISTER 
tIS THE POWER FAIL MONITOR BIT SET? 
: BRANCH IF NO 



CLR 
JMP 
END >0F 



STOPOK 
EXIT 

IF STOPOK 



IF NOSCOPE IS TRUE 



L466: 



RTI 
END :0F IF 



aR-C 
;R C 
jR-C 
jR-C 
iR-C 
sR-C 
iR-C 
TST STOPOK 
BEQ L466 
BIT «SU8.8SUR 
BEQ L466 



s i t i 

TST NOSCOPE 
BEQ L467 



NOSCOPE 



II: 



IF «SU14 SET. IN 8SUR THEN GOTO lOVER 



L467:::::: 



000004 



004064 



i*««««START OF 

IXTSTR: BR 

MOV 
MOV 
TST 
MOV 
BR 

It: ADD 
CMP 
BNE 
CLR 



CODE FOR THE XOR 
2t 

ERRVEC.-(SP) 

•lI.ERRVEC 

177060 I » TIME 

(SP)*.ERRVEC 

ISVLAO 

•4.SP 

♦5.PR0TYP 

6t 

CPUERR 



BIT •SU14.8SUR 

BNE lOVER 



TESTER««**« 

J, IF RUNNING ON THE "XOR" TESTER CHANGE 
ijTHIS INSTRUCTION TO A "NOP" (NOP -240) 
II SAVE THE CONTENTS OF THE ERROR VECTOR 
mSET FOR TIMEOUT 
OUT ON XOR? 
ti RESTORE THE ERROR VECTOR 
s jGO TO THE NEXT TEST 
I FIX STACK FROM TRAP 
sis THIS AN 11/83 ? 
(BRANCH IF NOT 
(RESET CPU ERROR REGISTER 



CVMJA80 HSVll-J MEMORY OIAG. 
ROUTINE SCOPE HANDLER 
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SEQ 034S 



13183 


05J .?50 


012637 


000004 




A ^ A 


051254 


000407 






13185 


051256 








13186 


051256 


105737 


002014 




15187 


051262 


001412 






15188 


051264 


032777 


001000 


131344 


15189 


051272 


001404 






13190 


051274 


013737 


002624 


002622 


13191 


051302 


000410 






13192 


051304 


105037 


002014 




13193 


051310 


011637 


002622 




13194 


051314 


011637 


002624 




1319S 


051320 


005037 


002362 




13196 


051324 


004737 


051336 




13197 


051330 


013716 


002622 




13198 


051334 


000002 







61 

2» 
3* 



MOV 
BR 

i «««*«£N0 
TSTB 
BEQ 
BIT 
BEQ 
MOV 
BR 

CLRB 



4$: 

5*: 
tSVLAD: 



*OVER: 



MOV 

MOV 

CLR 

CALL 

MOV 

RTI 



(SP)».ERRVEC 
41 

or CODE FOR THE XOR 
«ERFL6 
«SVLAD 
«SU9,8SUR 
5* 

tLPERR.*LPAOR 

lOVER 

(ERFLG 

(SP). ILPAOR 

CSP).ILPERR 

(ESCAPE 

6ETDIS 

*LPAOR.(SP) 



i RESTORE THE ERROR VECTOR 
(LOOP ON THE PRESENT TEST 
TESTER***** 

I HAS AN ERROR OCCURRED? 

tBR IF NO 

(LOOP ON ERROR? 
I gp 1^ 

I SET LOOP ADDRESS TO LAST 



SCOPE 



(ZERO THE ERROR FLAG 

I SAVE SCOPE LOOP ADDRESS 

I SAVE ERROR LOOP ADDRESS 

I CLEAR THE ESCAPE FROM ERROR ADDRESS 

s (FUDGE RETURN ADDRESS 
ijFIXES PS 



CVMJA80 MSVll-J MEMORT OIAG. 
ROOT INC SCOPE HANDLER 

13200 051SS6 
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13201 
13202 
13203 

13204 
1S20S 
13206 
13207 
13211 
13212 
13213 

13214 



OS 1336 
051544 
051352 
051352 
051354 
051360 
051362 
051370 
051370 
051376 
051404 
051404 
051406 



113737 002102 002013 
113737 002300 002012 

010046 

005737 002126 
001403 

052737 100000 0C2012 

013777 002012 131242 
013737 002012 000174 

012600 
000207 



SCO 0346 



GETOIS: SUBTST 



•SUBTEST 



Hi 



<<SUBR DISPLAY >> 
SUBR DISPLAY 



HOVB 

nova 

PUSH 

TST 
BEQ 
BIS 

MOV 
MOV 
POP 

RETURN 



6ANK.«BANK 
REALPAT . IPATMAR 
RO 

RLFLAG 
1» 

«BIT15.*PATMAR 

IPATMAR.SOISPLAY 

IPATMAR.OISPREG 

RO 



:ARE UE RELOCATED? 

iNO - SKIP 

I YES - SET MSB 



MOV RO.-(SP) 



: SOFTWARE DISPLAY REGISTER 

MOV (SP)^.RO 



CVMJ*BO MSVll-J MEMORY OIAG. 
ROUTINE ERROR HANDLER 



15217 
15218 
15219 
15220 
15221 
15222 
15223 
1S224 
15225 
13226 
15227 
13226 
13229 
13230 
13256 
13237 
15236 
13239 
15240 
13241 
15242 



13243 
15244 
15245 
13246 
13247 
13240 
15249 
13250 
13251 



051410 
051414 
051416 
051420 
051424 
051450 
051450 
051454 
051456 
051440 
051440 
051444 
051446 
051452 
051460 
051466 
051470 
051470 



005737 
001403 
005000 
004757 
105057 

005757 
001027 
104410 

105257 
001775 
004757 
013737 
032777 
001404 



15252 051474 
051474 



13255 
15254 

15255 
13256 

15257 

15258 
13259 
15260 
15261 
15262 
15265 
15264 
15265 
15266 
15267 
13268 
15269 



051500 
051504 
051504 
051506 
051514 
051514 
051514 
051514 
051514 
051520 
051526 
051552 
051540 

051546 
051554 
051556 
051562 
051564 
051570 



104401 

005257 

100005 
012757 



011657 
162757 
010657 
016657 
117757 

122757 
001451 
105757 
001024 
005757 
001425 
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.SBTTL ROUTINE ERROR HANDLER 



SEQ 054 



*THIS ROUTINE WILL INCREMENT THE ERROR FLAG AND THE ERROR COUNT. 
*SAVE THE ERROR ITEM NUMBER AND THE ADDRESS OF THE ERROR CALL 
*AND 60 TO lERRTYP ON ERROR 

*THE SWITCH OPTIONS PROVIDED BY THIS ROUTINE ARE: 



*SU15-1 
*SU15-1 
*SU10-1 
•SU9>1 LOOP ON ERROR 
*CALL 

• ERROR N 



HALT ON ERROR 
INHIBIT ERROR TYPEOUTS 
BELL ON ERROR 



. ENABL LSB 



005762 



052220 
052560 

002450 



002014 

051356 
002012 
002000 



lERROR: 



KAL: 



BACK: 
II: 



056722 
151150 



104401 002655 



'>66150 
002650 

077777 002650 



21: 



002020 
000002 
002024 
000002 
150254 



002020 

002050 
002015 



000177 002015 

052560 

052564 



TST 
BEQ 
CLR 
JSR 
CLRB 



UFDFLG 

KAL 

RO 

PC. ABORT 
IBSAVE 



:ERROR-EMT AND N-ERROR ITEM NUMBER 



ijK ARE WE IN UFD MODE 

iiK IF NOT 00 NOT TRY ABORT 

iiK ELSE CLEAR CNTRL Z AND C AND 

i:K CHECK FOR UFO ABORT 



IF NOERROR IS FALSE 



CKSWR 



INCB 


lERFLG 


BEQ 


1* 


CALL 


GETOIS 


MOV 


tPATMAR.ITESTN 


BIT 


*SW10,SSWR 


BEQ 


21 


TYPE 


IBELL 


TYPEIT 


, <BELL 


.DSA6L 


CRF 


TYPE 


MSG014 


TYPEIT 


.MSG014 


.DSABL 


CRF 


INC 


•ERTTL 



IF RESULT IS HI 

MOV #77777. lERTTL 
END J OF IF RESULT 

END iOF IF NOERROR 

MOV CSP).ERRPC 

SUB «2.ERRPC 

MOV SP.ERRSP 

MOV 2CSP).ERRPSW 

MOVB SERRPC.tlTEMB 

CMPB ♦177.IITEHB 

BEQ 1001 t 

TSTB IBSAVE 

BNE 1000 t 

TST CPERRF 

BEQ 10011 



TEST FOR CHANGE IN SOFT-SWR 



: sSET THE ERROR FLAG 

>:OON'T LET THE FLAG GO TO ZERO 

J SETUP DISPLAY STUFF 

iFOR APT 

tiBELL ON ERROR? 
iiNO - SKIP 
i (RING BELL 



: CONTROL Z 



t; COUNT THE NUMBER OF ERRORS 



iR-C 

TST NOERROR 
BNE L470 

iR-C 



BPL L471 



L471: i 1 1 i i t 
L470: i i i I : ( 

isGET ADDRESS OF ERROR INSTRUCTION 



ii STRIP AND SAVE THE ERROR ITEM CODE 

(IS THIS THE POWER FAIL CALL? 
(BRANCH IF SO 
!2ND ERROR CALL? 
(BRANCH IF SO 

;IS THERE A CPU ERROR REGISTER? 
(BRANCH IF NOT 



(R-C 
(R-C 
(R-C 
(R-C 
«R-C 
(R-C 



CVMJABO MSVll-J MCMOHY OIAf. 
ROUTINE ERROR HANOtER 
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SEQ 0348 



13270 
15271 
13272 
13273 
13274 
15275 
13276 
13277 
13278 
13279 



13280 



13281 
1S282 
1S28S 
13284 
13285 
13286 

13287 
13288 
13289 



13290 
13291 

13292 



13293 

13294 

13295 

13296 
13297 



13296 
13299 
ISSOO 



051572 
051600 
051606 
051610 
051616 
051624 
051632 
051634 
051640 
051640 
051640 
051644 
051646 
051646 
051652 
051654 
051662 
051670 
051676 
051704 
051710 
051710 
051710 
051716 
051722 
051722 
051730 
051732 
051734 
0S17S4 
0S17S4 
051754 
051742 
051744 
051750 
0SI7S2 
051752 
051754 
051754 
051754 
051754 
051754 
051760 
051760 
051764 
051766 
051772 
051774 
051774 



013737 
032737 
001414 
042737 
112737 
112737 
000402 
105037 



005737 
001043 

005737 
001416 
013737 
162737 
013737 
013737 
C050S7 



013737 
004737 

032777 
001401 
000420 



032777 
001404 
005737 
001401 

000410 



004737 

005737 
001403 
013706 
000207 



177766 
000001 

000001 
002015 
000177 

052360 
002430 

002022 

002022 
000002 
002026 
002032 
002022 



002020 
050354 

020000 



000040 
002406 



052366 
002276 
002274 



052362 
052362 

177766 
052360 
002015 



1000$ I 
1001$: 



002020 
002020 
002024 
002030 



056720 
130706 

130674 



flOV 1 77766. CPSAVE 

BIT «BITO. CPSAVE 

BEQ 1001$ 

BIC #BITO. 177766 

nOVB ««ITEr«.IBSAVE 

nOVB «177.tITEr« 

BR 1001* 

CLRB IBSAVE 

ir NOERROR IS FALSE 



IF BAOPC NE *0 



MOV BAOPC, ERRPC 
SUB «2. ERRPC 
MOV BAOSP.ERRSP 
nOV BAOPSU.ERRPSU 
CLR BAOPC 
ENO J IF 

MOV ERRPC. IFATAL 

CALL PER8NK 

IF «SU13 SET. IN aSUR 



(SAVE CONTENTS 
iPOUER MONITOR BIT SET? 
(BRANCH IF NOT 
I CLEAR THE BIT 

(MAKE IBSAVE NON-ZERO FOR DUAL CALL 
;SET IITEMB TO POWER FAIL POINTER 



.R-C 
.R-C 
iR-C 
,R-C 
iR-C 
«R-C 
iR-C 
iR-C 
«R-C 



TST NOERROR 
BNE L472 

TST BAOPC 
BEQ L473 



sFOR APT 

t tLOG ERROR ON BANK 



L473: i I i i i > 



BR 3« 
ENO iOF IF •SUIS 

IF «SU5 SET. IN 8SUR AND TOOMANY IS TRUE 

GOTO 3« 
ENO I OF IF «SW5 
ENO iOF IF NOERROR 



L474: 



BIT *SU13.aSUR 
BEQ L474 



BIT •sus.asyR 

BEQ L475 
TST TOOHANY 
BEQ L475 



BR 3t 

L475: 1 i t s 1 1 



CALL lERRTYP 
IF MONFLG IS TRUE 



ENO 



MOV 
RTS 



SAVMON.SP 
PC 



L472: 1 s i I i i 
SI GO TO USER ERROR ROUTINE 
:: SHOULD UE RETURN TO XXDP MONITOR??? 

TST MONFLG 
BEQ L476 

iiGET MONITOR ADDRESS 
; (GO TO MONITOR 



> > 



L476: 



i s I 



cvnjAao nsvii J memory diag. 

ROUTIME EftftOR HANDLER 



15502 


051774 








051774 


AAC ^ V ^ 

005737 


AA^^ VA 




052 OOO 


AA« A7 ^ 




15305 


052O02 


\/v5 » ' » 


xoOooc 


15504 


052006 


4 AAAAO 




1 350S 


AC A 








052012 


1 AAA 1 A 






052014 








AC ^A 1 A 

052014 




AA944n 




AC9A^A 

052P20 


AA1 A^A 






AC9A99 




AA1 AAA 




(W9AXA 


AAI 409 




13306 


AC9AX9 

vS20»2 


A1 X714 
VX3 f xe 






W5c030 


















(A/3 /Of 


009X49 




W52w*c 


AA1 4A9 




13312 


AOA44 


ni X714 
UXd f XD 


009X49 




AC9ACA 








AK^AKA 


Pn47X7 


009990 




AC^AC^ 


nni A4X 






A«3fMJk 


ft997X7 


000009 




AC^Ak J 


001 nA9 










1 77744 

X f f f wv 


I AAA ' 












009XS0 














«A/ J for 


009549 




A4 


00100X 
wxwo 








wo for 






ACO 119 


A014M 
\A/X^VO 






n^91 14 








A01 1 4 


01 97X7 
UXc f O f 


000001 




OU1 99 


0001 X7 
VWXO f 




1 XX90 










0S2126 






13321 


0S2126 










M47X7 

f O f 


wvcoo^ 




M91 X3 


A014t4 


WCwOV 




AS91 X4 


09X797 
VcO f C f 




1 49 


101410 
XUX^XV 






0^91 44 








049144 


1 04401 
X V^^vX 


070191 


1 XX3X 


AS31 CA 


01 X700 
VXO f (A/ 


000049 


1 XX3A 


n<91 %A 


OOSOX7 


000049 




0U1&0 
v^cXW 


WV AO f 


015710 
VAO r AV 


1 XX9& 


OU144 
v^cXO^ 








OUl 44 






13327 


0S21M 








0S2164 






13320 


0S2164 








052164 


000403 






052166 






13329 


052166 








052166 


012737 


177777 


13330 


052174 







MACRO r05.02 
31: 

IHALT: 

7»! 

130606 



Monday 07-0ct-65 16:57 Page 410 
IF NOERROR IS FALSE 



SEQ 0349 



91 1 



004064 



056716 



000020 



002612 



TST 
BPL 
HALT 
CKSUR 



8SUR 
71 



t iHALT ON ERROR 

t (SKIP IF CONTINUE 

I (HALT ON ERROR! 

11 TEST FOR CHANGE IN SOFT SUR 



IF NOSCOPE IS FALSE AND •SU9 SET. IN 8SUR 



MOV ILPERR.(SP) 
END I OF IF NOSCOPE 

TST lESCAPE 
BEQ 91 

MOV lESCAPE.CSP) 
IF OETFLAG IS FALSE 



> i 



FUDGE RETURN FOR LOOPING 



TST NOERROR 
BNE L477 



TST NOSCOPE 
BNE L500 
BIT •SU9.8SUR 
BEQ L500 



LSOO : 1 1 1 1 1 i 
I (CHECK FOR AN ESCAPE ADDRESS 
itBR IF NONE 

1 1 FUDGE RETURN ADDRESS FOR ESCAPE 



TST OETFLAG 
BNE L501 

CMP M.PROTYP lis THIS AN 11/63 7 

BNE 11 • 
CLR CPUERR 

111: IF ACTFLAG IS TRUE OR APTFLAG IS TRUE OR FATALI IS TRUE 

TST ACTFLAG 
BNE L502 
TST APTFLAG 
BNE LS02 
TST FATALI 
BEQ L503 
L502: :::<(> 

MOV *l.tMSGTY ,F0R APT 

JMP EXIT 
END I OF IF ACTFLAG 

L503 : : ; > 1 1 i 

IF XXOPCHAIN IS TRUE AND lERTTL HI 420 

TST XXDPCHAIN 
BEQ L504 
CMP •ERTTL.420 
8LDS L504 

TYPE nSG066 s ERROR COUNT EXCEEDED 20 - ABORTING FOR XXDP CHAIN 

TYPEIT .MSG066 
.DSABL CRF 

MOV 42. RO 

CLR 42 

jnp IZAP42 
END I OF IF XXDPCHAIN 



END 
ELSE 



I OF IF DETFLAG 



SET HEADER 
END I OF IF NOERROR 



L504 : 1 i i i > : 

L501 : i 1 1 1 1 1 

BR L505 
L477: 1 1 i I i > 



MOV 4-1. HEADER 



I 



cvnjASO nsvii j rcnoRY diag. 

ROUTINE EMOR HANDLER 



052174 

15551 0S2174 
052174 
052200 

15552 052204 

15553 052210 
1SS34 052212 
1SS55 052216 
1SS3« 

1SSS7 052220 



005037 
005037 
105737 
001402 
000137 
000002 



002406 
0024S0 
052360 

051440 



MACRO Y05.02 rtontfay 07-0ct-e5 16:57 Pag* 410-1 



SCO 0350 



10«: 



CLEAR TOOnANY.NOERROR 



TSTB IBSAVE 

BEQ 2131 

JNP BACK 
213* : RTI 



1 1 RETURN 
I ABORT 

.S8TTL ABORT ROUTINE fOR LCP/ORION UFO NODE 



L50S: I i < i 1 1 

CLR TOONANY 
CLR NOCRROR 
iPOWER FAIL ERROR CALL? |R-C 

• R-C 

tJUHP If SO iR-C 



052220 005737 003762 

052224 001454 

052226 020027 000032 

052232 001443 

052234 020027 000003 

052240 C01404 

052242 005737 003764 

052246 001443 

052250 000422 



ABORT: 



TST 
BEQ 
CMP 
BEQ 
CHP 
BEQ 
TST 
BEQ 

BR 



UF0FL6 

NOABRT 

R0.*32 

ABORTZ 

R0.*3 

ABORTC 

UQUIET 



ABORTE 



I TEST FOR USER FRIENDLY flOOE 

I IF NOT UFO THEN CONTINUE NORNAL OPERATION 

lis IT A tZ ? 

I JUST GO BACK TO CHAIN IF IT IS (NO ERROR) 

lis IS A tC 7 

iBR TO LOAD tC ON XXOP* STACK (NO ERROR) 
I TEST FOR USER-QUIET HOOE 

I IF FIELD-SERVICE NODE. CONTINUE NORHAL OPERATION 
t BECAUSE FIELD-SERVICE NODE DOES NOT QUIT ON ERROR 
I SET DRSERR THEN LEAVE 



052252 
052260 
052266 
052270 
052272 
052274 
052302 
052306 
052312 
052314 
052316 
052324 
052332 
052334 
0S2S42 
0S2S46 
052352 
052356 



13336 052360 
l33Sf 0S2S62 
13340 052364 
13341 



013737 
013737 
104043 
105720 
001376 
112760 
112720 
112720 
105010 
000412 
013737 
013737 
104042 
012760 
013700 
005037 
000137 
000207 



003756 
003760 



000057 
000136 
000103 



003756 
003760 

177777 
000042 
000042 
013730 



000000 
000000 



000030 


ABORTC: 


HOV 




SAV30.30 


i RESTORE EHT LKATION (30) 


000032 




HOV 




SAV32.32 


(RESTORE ENT PRIORITY LOCATION (32) 






EHT 




•43 


iGET XXOP STACK LOC. INTO RO FROM MONITOR 




1001: 


TSTB 




(RO)* 


iFIND END OF STACK 






BNE 




1001 




177777 




novB 




#'/.-l(RO) 


(LOAD SLASH OVER ZERO 






M0V8 




♦t.CRO)* 


iLOAO UPARROU 






novB 




•'C.(RO)* 


iLOAO C 






CLRB 




(RO) 


iNAKE NEW END TO STACK 






BR 




ABORTZ 


iNOM LEAVE 


000030 


ABORTE: 


NOV 




SAV30.30 


1 RESTORE ENT LOCATION (30) 


000032 




NOV 




SAV32.32 


iRESTORC ENT PRIORITY LOCATION (32) 






EHT 




♦42 


iGET DCA LOCATION INTO RO FROM MONITOR 


000042 




NOV 




♦-1.42(R0) 


tSET A -1 INTO LKATION ORSCRR IN MONITOR 




ABORTZ: 


NOV 




BM2.ro 


(AND PUT TIC MONITOR RETURN ADDRESS IN RO 






CLR 




M42 


laEAR MONITOR RETURN FLAG 






JHP 




lENDAO 


iRETURN TO MONITOR-DO NOT PUSH STACK HERE 




NOABRT: 


RTS 




PC 


(IF NDTUFD RETURN TO MAIILIIC 




IBSAVE: 


.UORO 


0 




(R-C 




CPSAVE: 


.UORO 


0 




(R-C 




CPERRF: 


.WORD 


0 




.R-C 






.DSAM. 


LSB 





wvnjABo nsvii J nenoRY oiag. 

ROUTINE ERROR MESSAGE TYPEOUT 

13344 
13345 
13346 
13547 
13S48 
13?49 
13550 



1ACR0 Y0S.02 Monday 07 -Oct 85 16:57 Pag* 412 



SBTTL ROUTINE ERROR MESSAGE TYPEOUT 



SEQ 0351 



1335' 
1335 > 



issse 

13SS9 
13360 
13361 
1SS62 
13363 
13364 
13365 
13366 
13367 
13366 
13369 
13370 
1SS71 
1SS72 
1SS7S 
1SS74 
13575 
ISS76 



ISSM 
ISSSl 
1SS62 
13563 
13564 
13365 
15566 



,*THIS ROUTINE USES THE "ITEM CONTROL BYTE" (lITEMe) TO DETERMINE UMICH 
;»ERROR IS TO BE REPORTED. IT THEN OBTAINS. EROM THE "ERROR TABLE" (lERRTB), 
i*ANO REPORTS THE APPROPRIATE INTGRMATIGN CONCERNING THE ERROR. 



052566 


104415 




tERPTYP 


: SAVREG 




II "CARRIAGE RETURN" £ "LINE FEED" 


052570 








TYPE 


tCRLF 


052370 


104401 


002660 




TYPEIT 


. »CRLE 
CRE 












. DSABL 




052374 


00500C 






CLR 


RO 


1 iPICKUP THE ITEM INDEX 


052376 


153700 


002015 




BISB 


*ITEMB.RO 




052402 


001004 






BNE 


1* 


II IF ITEM NUMBER IS ZERO. JUST 












1 : TYPE THE PC OF THE ERROR 


052404 








TYPOCT 


ERRPC.< ERROR 


ADDRESS > 


052404 


015746 


002020 




MOV 


ERRPC, -(SP) 


II SAVE ERRPC FOR TYPEOUT 








1 1 ERROR ADDRESS 


052410 


104402 






TYPOC 




iiGO TYPE- -OCTAL ASCIKALL DIGITS) 








DSABL 


CRE 




052412 


000511 






BR 


11* 


isGET OUT 


052414 


122700 


000177 


1«: 


CMPB 


•177.ro 


1 POWER MONITOR CALL? 


052420 


001005 






BNE 


100* 


{BRANCH IF NOT 


052422 


012700 


052676 




nov 


•PEECUS.RO 


;MOV ADDRESS OF PFE BIT ERROR TO RO 


052426 


000406 






BR 


110* 




052450 


005500 




100*: 


DEC 


RO 


: {ADJUST THE INDEX SO THAT IT WILL 


052452 


006500 






ASL 


RO 


1! WORK FOR THE ERROR TABLE 


052454 


006500 






ASL 


RO 




052456 


006500 






ASL 


RO 




052440 


062700 


057544 




ADO 


•(ERRTB.RO 


11 FORM TABLE POINTER 


052444 


012057 


052502 


not: 


MOV 


(R0}*.5* 


iiPICKUP -ERROR MESSAGE" POINTER 


052450 


001417 






BEO 


4* 


siSKlP TYPEOUT IF NO POINTER 
ilS THIS REALLY AN ERROR? 


052452 


005757 


002450 




r,T 


NOERROR 


052456 


001005 






BHE 


12* 


{YES - SKIP 


052460 


005757 


002612 




TST 


HEADER 


{TYPE HEADER? 


052464 


100011 






BPL 


4* 


iNO - SKIP 


052466 


005737 


002064 


12*: 


TST 


FATAL* 


lUAS IT A FATAL ERROR? 


052472 


001402 






BEQ 


2* 


{NO SKIP 


052474 








TYPE 


MSG067 


{FATAL 


052474 


104401 


070170 




TYPEIT 


.nSC067 








.OSABL 


CRF 




052500 






2(: 


TYPE 




{{TYPE THE "ERROR MESSAGE" 


052500 


104401 






TYPEIT 










.OSABL 


CRE 




052502 


000000 




5*: 


.UORD 


0 


i; "ERROR MESSAGE" POINTER GOES HERE 


052504 






TYPE 


*CRLE 


{{ "CARRIAGE RETURN" £ "LINE FEED" 


0S2S04 


104401 


002660 




TYPEIT 


. »CRLE 










.DSABL 


CRF 




052510 


012057 


032554 


4*: 


MOV 


(R0)..5I 


ijPICKUP "DATA HEADER" POINTER 


0^14 


001412 






BEQ 


6« 


11 SKIP TYPEOUT IF 0 


0.»2516 


005757 


002450 




TST 


NOERROR 


lis THIS REALLY AN ERROR? 


052522 


001005 






BNE 


15* 


lYES - SKIP 


052524 


005757 


002612 




TST 


HEADER 


iTYPE HEADER? 


052550 
052552 


100004 






BPL 


6* 


'NO SKIP 






15*: 


TYPE 




iiTYPE THE "DATA HEADER" 


052352 


104401 






TYPEIT 
.DSABL 


CRE 





R-C 
R C 
R C 
R C 
R-C 



:R C 



CVMjAeo MSVll J nEtw OI*C. 
ROUTINE ERROR riESSACE TrPEOUT 



nACRO YDS 02 HoAday 07 Oct SS 16:S7 



15507 052554 
ISSSa 052556 
052556 



000000 

104401 002660 



15589 052542 012001 

15590 052344 001427 

15591 052546 012002 



51: 



6(: 



.WORD 

TYPE 

TYPEIT 



MOV 
BEO 
HOV 



0 

ICRLr 
. »CRLr 



. OSWL CRf 



CRO)>.Rl 
101 

iR0)*.R2 



412-1 



•DATA HEADER" POINTER GOES HERE 
-CARRIAGE RETURN" C "LINE rEEO" 



PICKOP -DATA TABLE" POINTER 
BR If NO DATA TO BE TYPED 
PICKUP "DATA fORNAT- POINTER 



CVMJASO MSVll J rfEnOftf DIAG. 
ROUTINE ERRO« f«SSAGt TyPEOUT 



MACRO Y05.02 Monday 07 -Oct -85 16:57 P«o« 414 



SEQ 0S5S 



13394 
13395 
13396 
13397 
13396 
13399 
13400 
13401 
13402 
13403 
13404 
13405 
13406 
13407 
13412 
13413 
13414 
13415 



13416 
15417 
13418 
13419 
13420 
13421 
13422 



052550 
052552 
052554 
052560 
052562 
052564 
052566 
052570 
052572 
052574 
052576 
052600 
052602 
052604 
05260to 
052612 
052614 
052616 
052616 

052622 



052624 
052630 
052632 
052636 
052640 
052640 
052646 
052650 
052654 
0S26S6 
052662 

13423 052664 

13424 052670 
052670 

13425 052670 



13426 
13427 
13428 



13429 



134 30 



112203 




7$ : 


novB 


(R2)« .R3 


006303 






ASL 


R3 


004773 


•^52562 




CALL 


08I(R3) 


000412 






BR 


9t 


053006 




8t: 


TAG70I 




053016 






TAG71» 




055026 






TAG72» 




053076 






TAG73I 




053136 






TAG74I 




053150 






TAG75» 




053162 






TAG76t 




053226 






TAG77$ 




053234 






TAG78t 




053314 






TAG79t 




062701 


00000? 


91 : 


ADO 


•2,R1 


005711 






TST 


(Rl) 


001403 






BEQ 


101 






TYPE 


nSGOlB 


104401 


066157 




TYPEIT 


,nSG018 








.OSABL 


CRF 


000752 






BR 


7$ 


005737 


002110 


10$ : 


TST 


HUT 


001402 






BEQ 


11* 


005237 


002612 




INC 


HEADER 


104416 




lit : 


RESREG 








IF ♦SU7 


SET. IN a 


032777 


000200 


127770 






001410 










005737 


002220 








001005 










005737 


002430 








001002 






CALL 


DETAIL 


004737 


05SSS6 








END lOF 


IF ♦SW7 



052670 


104401 


070627 




052674 


000207 






052676 


052706 


052742 


052772 


052704 


053002 




127 


052706 


120 


117 


052711 


105 


122 


040 


052714 


lis 


117 


116 


052717 


111 


124 


117 


052722 


122 


040 


102 


052725 


111 


124 


040 


052730 


106 


117 


125 


052733 


116 


104 


040 


052736 


123 


105 


124 


052741 


000 






052742 


124 


105 


123 


052745 


124 


116 


117 


052750 


040 


040 


105 


052753 


122 


122 


040 



:nAKE IT A UORO ADDRESS 



sUPDATE DATA TABLE POINTER 
s:IS THERE ANOTHER NUMBER? 
:iBR IF NO 
;TYPE 2 SPACES 



; iLOOP 

ilS THERE A MEMORY UNDER TEST 
'NO - SKIP 

IyES - BUMP HEADER FLAG 
AND DETFLAG IS FALSE AND NOERROR IS 



FALSE 

BIT *SU7,8SUR 

BEQ L506 
TST DETFLAG 
BNE L506 
TST NOERROR 
BNE Lb06 



PFECWS: 



TYPE 

TYPEIT 

.OSABL 

RETURN 

.EVEN 

.UORO 



nSG104 

.HSG104 

CRF 



: CONTROL Z 



L506: 



PFFCEH . PFECOH . PFECDT . PFECOF 



;R 
jR 



PFECEM: .ASCIZ "POUER MONITOR BIT FOUND SET' 



:R C 



PFECOH: .ASCIZ "TESTNO ERR PC CPUERR" 



.R C 



CvnjABO nsvil-J nEnOnr OIAG. riACftO Y05.02 Monday 07-Oct 85 16:57 Pag* 414 1 
ROUTINE ERROR MESSAGE TYPEOUT 

05275* 120 103 040 

052761 040 103 120 

052764 125 105 122 
052767 122 000 

13431 .EVEN 

13432 052772 056722 002020 052362 PfECOT: .UORO ITESTN.ERRPC.CPSAVE .0 
053000 000000 

13433 053002 000 000 000 PFECOF : .BYTE 0.0.0.0 
053005 000 

13434 



SEQ 0354 



.R C 
.R-C 

jR-C 



CVMJASO nSVll-J nEflORY DIAG. 
ROUTINE ERROR MESSAGE TYPEOUT 



15437 
13436 
13439 

13440 053006 
053006 
053012 



riACRO Y05.02 Monday 07-0ct-S5 16:57 Pmgm 416 



SEQ 0355 



OCTAL *** 



13441 053014 

13442 

13443 

13444 

13445 

13446 053016 
053016 
053022 



017146 
104402 

000207 



017146 
104405 



000000 



TAC70*: TYPOCT a(Rl) 

MOV 8(R1).-(SP) 
TYPOC 

.DSABL CRF 
RETURN 



> I TYPE AN OCTAL NUMBER 

mSAVE 8(R1) for TYPEOUT 

iiGO TYPE--0CTAL ASCIKALL DXGITS) 



i*** DECIMAL 



000000 



TAC71$: TYPOEC 8(R1) 



1S447 
1344S 
13449 
13450 
13451 
13452 



13453 
13454 
13455 

13456 



053024 000207 



MOV 
TYPOS 
.DSABL CRF 
RETURN 



a(Rl).-(SP) 



11 TYPE A DECIMAL NUMBER 

ijSAVE a(Rl) FOR TYPEOUT 

i:G0 TYPE- -DECIMAL ASCII UITH SIGN 



I*** INTERLEAVE *** 



053026 
053026 
053030 
053032 
053036 
053042 
053042 
053050 
053050 



13457 053054 
13456 053060 

13459 053064 
053064 
053066 

13460 053070 
053070 



010146 
010546 
013701 
070127 

012737 

104401 

004737 

005037 

012605 
012601 



002102 
000004 

177777 

066130 

033272 
002372 



002372 



104401 066130 



TAG72t: PUSH 



MOV 
MUL 
SET 

TYPE 

TYPEIT 

.DSABL 

CALL 

CLR 

POP 



TYPE 
TYPEIT 
.DSABL 



R1.R5 



BANK.Rl 

#4.R1 

NOTAB 

MSG014 

.MSG014 

CRF 

TCFIGl 

NOTAB 

R5.R1 



MSG014 
.MSG014 
CRF 



MOV R1,-(SP) 
MOV R5,-(SP) 



{INDICATE NO TABLE TO BE PRINTED - NOU 

MOV •-1. NOTAB 



si SPACE 



MOV (SP)».R5 
MOV (SP)*.R1 



13461 053074 


000207 




RETURN 








13462 














13463 














13464 






;**• CSR *** 








13465 














13466 053076 






TAG73I: PUSH 


R1.R5 






053076 


010146 








MOV 


Rl. (SP) 


053100 


010546 








MOV 


RS.-iSP) 


13467 053102 


013701 


002102 


MOV 


BANK.Rl 






13468 053106 


070127 


000004 


MUL 


•4.R1 






13469 053112 






SET 


NOTAB 






053112 


012737 


177777 002372 






MOV 


« i.Nor^« 


13470 053120 


004737 


033466 


CALL 


TCFIG3 






13471 053124 


005037 


002372 


CLR 


NOTAB 






13472 053130 






POP 


R5.R1 






053130 


012605 








MOV 


(SP)».R5 


053132 


012601 








MOV 


(SP)».R1 


13473 053134 


000207 




RETURN 









cvrijABo nsvii-j fienoRY oiac. 

ROUTINE ERROR MESSAGE TYPEOUT 

13474 
1547S 
15476 
13477 

1347a 0S3136 

0S31S6 013746 002300 

053142 104403 

053144 002 

053145 001 

13479 053146 000207 

134S0 

13461 

13462 

13463 

13464 053150 

053150 013746 002102 

055154 104403 

053156 003 

053157 000 

13465 053160 000207 



riACRO Y05.02 Monday 07-0ct-65 16:57 Pag* 416-1 



SEQ 0356 



,«** PATTERN *** 
Ug74» 



TYPOCS 
MOV 

TYPOS 

.BYTE 

.BYTE 

.OSABL 

RETURN 



REALPAT.<TYPE (0-77)>.2.Z 
REALPAT,-(SP) siSAVE REALPAT FOR TYPEOUT 
iiTYPE (0-77) 
siGO TYPE- -OCTAL ASCII 
2 1 1 TYPE 2 DIGIT(S) 

1 1 1 TYPE LEADING ZEROS 

CRF 



;*** BANK 



TAG75»i 



TYPOCS 
MOV 

TYPOS 

.BYTE 

.BYTE 

.DSABL 

RETURN 



BANK.<TYPE (0-176)>.3 



BANK.-(SP) 



3 
0 

CRF 



I (SAVE BANK FOR TYPEOUT 
;,TYPE (0-176) 
5 J GO TYPE- -OCTAL ASCII 
jsTYPE 3 DIGIT(S) 
: {SUPPRESS LEADING ZEROS 



CVMJWO riSVll-J MEIiOWY DIAG. 
ROUTINE ERROR MESSAGE TYPEOUT 

13487 
15488 



riACRO Y05.02 Monday 07-Oct-85 16:57 Pag* 417 



SEQ 0357 



,*** nTYPE *** 



13490 


053162 
053162 
053164 


010146 
010546 




tAG76l : 


PUSH 


R1.R5 


13491 


053166 


013701 


002102 




MOV 


BANK.Rl 


13492 


053172 


070127 


000004 




MUL 


•4.R1 


13493 


053176 
053176 


012737 






SET 


Lin Y A B 


13494 


053204 








TYPE 


nsG0i7 


053204 


104401 


066162 




TYPEIT 
.DSA8L 


,nSG019 
CRF 


13495 


053210 


004737 


033332 




CALL 


TCFIG2 


1 34 TO 




VUDUd r 


UUed t c 




CLR 


NOTAB 


13497 


053220 
053220 
053222 


012605 
012601 






POP 


R5.R1 


13498 


053224 


000207 






RETURN 




13499 














13500 














13501 








1*** UNKNOUN DATA *** 


13502 














13503 


053226 






TAG77»: 


TYPE 


nSG061 




053226 


104401 


070037 




TYPEIT 


.nSG061 



MOV Rl.-(SP) 
MOV R5.-(SP) 



MOV •-1.N0TA8 



MOV (SP)*.R5 
MOV (SP)*.R1 



13504 
13505 
13506 
13507 
13508 
13509 
13510 
13511 
13512 
13513 
13514 
13515 
13516 
13517 
13518 



053232 000207 



.DSABL 
RETURN 



CRF 



PHYSICAL ADDRESS *** 



053234 
053242 
053250 
053256 
053262 
053264 
053272 
053276 
053302 
053306 
053306 



013737 
162737 
013737 
006237 
103003 
052737 
012746 
004737 
062706 



002034 
060000 
002102 
002042 

100000 
002040 
056576 
000002 



002040 TAG78*: MOV 



002040 
002042 



002040 



II: 



13519 053312 

13520 

13521 

13522 

15523 

13524 053314 
0S3S14 

13525 053320 
053320 

053324 
053326 
053327 



104401 0S6704 
000207 



SUB 

MOV 

ASR 

BCC 

BIS 

MOV 

CALL 

ADD 

TYPE 



TYPEIT . lOCTB 
.DSABL CRF 
RETURN 



ADDRESS. PHY ADD 
♦FIRST. PHY ADD 
BANK. PHY ADD* 2 
PHYADD«2 
It 

•eiT15.PHYA00 
«PHYADD.-(SP) 
IDB20 
♦2.SP 
t0CT8 



(POINTER TO DOUBLE WORD ON STACK 

iCALL DOUBLE PRECISION CONVERSION ROUTINE 

sFIX STACK 



J*** OCTAL BYTE *«* 



104401 



017146 

104403 

003 
001 



066157 
000000 



TAG79»: TYPE 

TYPEIT 
.DSABL 
TYPOCS 
MOV 

TYPOS 
.BYTE 
.BYTE 



MS6018 i2 SPACES 

.MSG018 

CRF 

8CR1).<TYPE BYTE>.3.Z 

8(R1).-(SP) stSAVE 8(R1) FOR TYPEOUT 

; a TYPE BYTE 

:iGO TYPE --OCTAL ASCII 
3 1 1 TYPE 3 DIGITCS) 

1 tiTYPE LEADING ZEROS 



CVMJABO MSVll-J MEMORY OIAG. 
ROUTINE ERROR MESSAGE TYPEOUT 



13526 0SS3S0 

05S3SO 104401 066130 
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13527 053334 000207 



SEQ 0356 



. DSABL CRF 

TYPE MSG014 

TYPEIT .MSG014 

. OSABL CRF 
RETURN 



> SPACE 



CVnjABO MSVll-J MEMORY DIAG. 
ftOUTINC ERROA MESSAGE TYPEOUT 
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SEQ 0S59 



13571 


053336 








DETAIL: 


SUBTST 


<<SUeR DETAILED 


ERROR 


REPORT >> 
















i*SUeTEST 


SU8R DETAILED 


ERROR 


REPORT 






13572 


053336 


005237 


002220 






INC 


DETFLAG 










13573 


053342 


022737 


000003 


002220 




CMP 


•3.0ETFLAG 










13574 


053350 


101473 








8L0S 


41 










13575 


053352 


022737 


000002 


002220 




CMP 


*2. DETFLAG 










13576 


053360 


001435 








SEQ 


2t 










13577 


053362 










PUSH 


HEADER. MUT 












053362 


013746 


002612 














MOV 


HEADER. -(SP) 




053366 


013746 


002110 














MOV 


MUT.-(SP) 


13578 


053372 










SET 


HEADER 












053372 


012737 


177777 


002612 












MOV 


•-1. HEADER 


13579 


053400 


005037 


002110 






CLR 


MUT 










13580 


053404 


010037 


002200 






MOV 


RO.DETRO 










13581 


053410 


012700 


002202 






MOV 


•OETRl.RO 










13582 


053414 


010120 








MOV 


R1,(R0)* 










13583 053416 


010220 








MOV 


R2.(R0)* 










13584 


053420 


C 10320 








MOV 


R3.(R0}* 










13585 


053422 


010420 








MOV 


R4.CR0)» 










13586 


053424 


010520 








MOV 


R5,(R0)» 










13587 


053426 


013720 


002024 






MOV 


ERRSP.(RO)* 










13588 


053432 


013720 


002030 






MOV 


ERRPSU.(RO)* 










13589 


053436 


013700 


002200 






MOV 


DETRO.RO 










13590 


053442 










SET 


NOERROR 












053442 


012737 


177777 


002430 












MOV 


« 1. NOERROR 


13591 


053450 


104013 








CKNuK 


♦ 13 










13592 


053452 


000423 








8R 


1) 










13593 


053454 








21 : 


PUSH 


HEADER. MUT 












053454 


013746 


002612 














MOV 


HEADER. (SP) 




053460 


013746 


002110 














MOV 


MUT.-(SP) 


13594 


053464 










SET 


»«AOER 










053464 


012757 


177777 


002612 












MOV 


•-1. HEADER 


13595 


053472 


005037 


002110 






CLR 


MUT 










13596 


053476 










SET 


NOERROR 












053476 


012737 


177777 


002430 












MOV 


*-l. NOERROR 


13597 


053504 


104031 








ERROR 


♦31 








13598 


053506 


022737 


000005 


004064 




CMP 


♦S.PROTVP 




;IS THIS AN 11/83 ? 






13599 


053514 


001002 








8NE 


1* 










13600 


053516 


005037 


177766 






CLR 


CPUERR 










13601 


053522 








11: 


POP 


MUT. HEADER 












053522 


012637 


002110 














MOV 


(SP)*.MUT 




053526 


012637 


002612 














MOV 


(SP)*. HEADER 


13602 












lUARNING RECURSIVE 








13603 


053532 


004737 


053336 






CALL 


DETAIL 










13604 


053536 


000207 








RETURN 













CVMJA80 nSVll-J MEMORY OIAG. 
SUen DETAILED ERROR REPORT 



13607 






13608 


053540 


004737 


15609 






13610 






13611 


053544 




053544 


013746 




053550 


013746 




053554 


010146 


15612 


053556 






053556 


104401 


13613 


0S3S62 






053562 


104401 


13614 


053566 


013701 


1361S 


053572 






053572 




13616 


053572 






053572 


005037 








13617 


053576 


006301 


13618 


053600 






033600 




13619 


053602 


104426 


13620 


053604 






053604 


015746 




053610 


104402 


'3621 


053612 






053612 


104401 


13622 


053616 






053616 




13623 


053616 






053616 


005701 




053620 


001407 


13624 


053622 




053622 


062737 




053630 


023727 




053636 


003757 




053640 




1362S 


053640 






053640 




13626 


053640 




053640 


012601 




053642 


012637 




053646 


012637 



13627 
13628 
13629 



13630 



053652 
055652 
053654 
0S36S6 
053656 



15651 05566^ 
15632 053666 



010046 
010146 

104401 070406 

015701 002574 
162701 000002 
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J SIMULATE CONTROL "T" 
4«: CALL CONTT 

;TYPE CONTENTS Of ALL CSR'S 



SEQ 0360 



J DISPLAY "DISPLAY- INFO 



PUSH 



TYPE 
TYPEIT 
. DSABL 
TYPE 
TYPEIT 
.DSABL 
MOV 



CSR.CSRNO.Rl 



MSG0S8 

.MSG0S8 

CRF 

♦ CRLF 

.<CRLF 

CRF 

TOTCSRS.Rl 



MOV 
MOV 
MOV 



CSR.-(SP) 

CSRNO.-(SP) 

Rl.-(SP) 



BEGIN DUMPCSRLOOP 

FOR CSRNO :- #0 TO «56 BY #2 



ASL 

ON. ERROR 



Rl 



READCSR 

TYPOCT CSR 
MOV CSR.-(SP) 
TYPOC 

.DSABL CRF 

TYPE MSG018 
TYPEIT .MSG018 
.0SA8L CRF 

END iOF ON. ERROR 



B102: i > I i < > 

CLR CSRNO 
B103: t > ; 1 1 i 



BCC L507 



J SAVE CSR FOR TYPEOUT 

;G0 TYPE — OCTAL ASCIKALL DIGITS) 

i2 SPACES 



IF Rl EQ *0 THEN LEAVE DUMPCSRLOOP 
END (OF FOR CSRNO 

END DUMPCSRLOOP 

POP Rl, CSRNO. CSR 



J TYPE STACKS 
PUSH RO.Rl 



L507: J s : : : ; 

TST Rl 
BEQ E102 

ADD •2. CSRNO 
CMP CSRNO. 436 
BLE BIOS 

E105:::issit 

E102:tis:i: 

MOV (SP)».R1 
MOV (SP)». CSRNO 
MOV (SP)*.CSR 



TYPE MSG088 

TYPEIT ,MSG088 

.DSABL CRF 

MOV KSTACK.Rl 

SUB •2.R1 



{KERNEL STACK 



MOV 
MOV 



RO.-(SP) 
Rl.-(SP) 



CVMJABO HSVll-J MEMOWY OIAG. 
SU8R OCTAILEO ERROR REPORT 



15655 055672 
0S3672 
053674 

15634 053674 
0SS674 

13635 053700 
0S3700 
053702 

13636 053704 
053704 

13657 055710 
053710 
053712 



13636 



13639 
13640 
13641 
13642 
13645 
13644 
13645 



13646 

13647 

13640 
13649 

13«50 

13651 
13652 

13653 



053714 
053714 
055720 
055722 
053724 

053724 
055750 
055752 
055740 
053746 
053750 
053750 
053752 
053754 
053754 

053760 
053760 
055764 
055766 
055766 
055766 
053766 

053772 
053772 
055774 

055776 
053776 

054002 
054002 
054004 

054006 
054006 
054012 
054016 



010600 



104401 002660 



010046 
104402 



104401 066157 



011046 
104402 



062700 
C20001 
003764 



005737 
001036 
042737 
052737 
006506 

012601 
012600 

104401 



020027 
002016 



000002 



002456 
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FOR RO :- SP TO Rl BY #2 



TYPE ICRLF 
TYPEIT . ICRLF 
.OSABL CRF 

TYPOCT RO 
MOV RO.-(SP) 
TYPOC 

.OSABL Cfkf 

TYPE nSGOlB 

TYPEIT .nsGOie 
.OSABL CRF 

TYPOCT (RO) 
riOV (RO).-(SP) 
TYPOC 

.OSABL CRF 
END I OF FOR RO 



SEQ 0361 



050000 177776 
010000 177776 



070424 

000740 



104401 002660 



010046 
104402 



104401 066157 



011046 
104402 



nOV SP.RO 
B104: ; : i t i i 



J I SAVE RO FOR TYPEOUT 

mGO TYPE—OCTAL ASCIKALL DIGITS) 

1 2 SPACES 



siSAVE (RO) FOR TYPEOUT 

liGO TYPE--OCTAL ASCIKALL DIGITS) 



iSET PREVIOUS nODE TO SUPERVISOR 

TST NOSUPER 

BNE OETl 

BIC •eiT13!BIT12.PSU 

BIS •eiT12.PSU 

MFPI SSP 

POP Rl.RO 



ADD «2.R0 
CnP RO.Rl 
BLE B104 
E104: t > i i I ( i 



TYPE MSG069 
TYPEIT .MSG0e9 
.DSA6L CRF 
IF RO LT *SUPSTK 



t SUPERVISOR STACK 



FOR RO :- RO TO •SUPSTK-2 BY •2 
TYPE ICRLF 



flOV (SP)*.R1 
NOV (SP)*.RO 



CnP RO.^SUPSTK 
BGE L510 



BIOS: 1 1 : i i i 



062700 
020027 
003763 



000002 
000736 



TYPEIT . ICRLF 
.OSABL CRF 

TYPOCT RO 
MOV RO.-(SP) 
TYPOC 

.OSABL CRF 

TYPE nSG016 
TYPEIT .MSGOie 
.OSABL CRF 

TYPOCT (RO) 
MOV (RO).-(SP) 
TYPOC 

.OSABL CRF 
END lOF FOR RO 



i J SAVE RO FOR TYPEOUT 

iiGO TYPE—OCTAL ASCIKALL DIGITS) 

(2 SPACES 



uSAVE (RO) FOR TYPEOUT 

aiGO TYPE—OCTAL ASCIKALL DIGITS) 



ADO *2.R0 

CNP RO. •SUPSTK-2 

BLE BIOS 



CVHJA80 

suen 



15654 
IMSS 

13656 

1S6S7 
13656 
13659 
13660 

13661 

13662 

13663 
13664 

13665 

13666 
13667 

1366S 

13669 

13670 

13671 
1S672 



13673 
13674 

13675 



MSVll J rCMORY 
OCTAILF.O ERROR 



054020 
054020 
054020 
054022 
054022 
054022 

054026 
054026 

054026 
054034 
054036 
054036 
054040 
054040 

054044 
054044 
054050 
0540r2 
0S40b2 
054052 
054052 

054056 
054056 
054060 

054062 
054062 

054066 
054066 
054070 

054072 
054072 
054076 
054102 
054104 
054104 
054104 
054106 
054 106 
054106 

054112 
054112 
054112 
054112 

054116 
054122 
054122 
054124 



000402 
104401 



052737 
006506 

012600 

104401 



020027 
C02016 



OIAC. 
RCPORT 



070462 
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SCO 0362 



062700 
020027 
005763 



000402 
104401 

104401 

005037 

012600 
000207 



030000 177776 OETl: 

070446 

000700 



104401 002660 



010046 
104402 



104401 066157 



011046 
104402 



000002 
000676 



070462 

002660 
002220 



ELSE 



TYPE nSG091 
TYPEIT ,nSG091 
.OSABL CRF 
END tOf IF RO 



lis EMPTY 



I SET PREVIOUS MODE TO USER 
BIS «eiTl3!BIT12.PSU 
MFPI USP 
POP RO 



E105: ( 1 1 1 1 1 1 

BR L511 
L510: 1 1 1 1 1 1 



L511: 1 1 1 1 1 1 



TYPE riSG090 
TYPEIT .riSG090 
.OSABL CRF 
IF RO LT tUSESTK 



(USER STACK 



FOR RO :- RO TO •USESTK-2 BY 92 



TYPE ICRLF 
TYPEIT .ICRLF 
.OSABL CRF 

TYPOCT RO 
nOV RO.-(SP) 
TYPOC 

.OSABL CRF 

TYPE nsGoie 
TYPEIT .MSG018 
.OSABL CRF 

TYPOCT (RO) 
NOV (RO).-(SP) 
TYPOC 

.OSABL CRF 
END lOF FOR RO 



NOV (SP)*.RO 



CNP R0.4USESTK 
BGE L512 



B106: i t i 1 1 1 



I : SAVE RO FOR TYPEOUT 

(iGO TYPE--OCTAL ASCIKALL DIGITS) 

t2 SPACES 



It SAVE (RO) FOR TYPEOUT 

iiGO TYPE--OCTAL ASCIKALL DIGITS) 



ELSE 



TYPE NSG091 

TYPEIT .NSG091 

.OSABL CRF 

ENO lOF IF RO 

TYPE ICRLF 

TYPEIT . ICRLF 

.OSABL CRF 

CLR OCTFLAG 

POP RO 

RETURN 



lis EMPTY 



ADO •2.R0 
CMP RO. •USESTK-2 
BLE B106 
E106: i i s 1 1 1 1 

BR L513 
L512: 1 1 1 1 1 1 



L513: 1 1 1 1 1 1 



NOV (SP)*.R0 



cvnjAeo nsvii-J rcnoftY diag. nACRO yos.02 

ROUTINE BINARY TO OCTAL (ASCII) AND TYPE 



1S71S 
1S714 
13715 
13716 
13717 
13716 
13719 
13720 
13721 
13722 
13723 
13724 
13725 
1372« 
13727 
1372t 
13729 
13730 
13731 
137S2 
13733 
13794 
13735 
13734 
13737 
137S« 
13739 
13740 
13741 
13742 
13743 
13744 
13745 
13744 
13747 
13744 
13749 
13730 
13751 
13752 
13753 
13754 
137SS 
13794 
13757 
13794 
13799 
13740 
13741 
13742 
13743 
1S744 
13745 
13744 
13747 
13744 
13749 
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.S8TTL ROUTINE BINARY TO OCTAL (ASCII) AND TYPE 



SEQ 0363 



054126 
054132 
094140 
054144 
054150 
054152 
054160 
054166 
054174 
094176 
094200 
094202 
094206 
094210 
094214 
094220 

oSlio 

094232 
094234 
36 




017646 
116637 
112637 
042714 
000406 
112737 
112737 
112737 
010546 
010446 
010946 
113704 
005404 
042704 
110437 
113704 
014405 
009003 
004109 



004105 
004105 
004105 
010903 
004103 
109337 
100014 
042703 
001002 
009704 
001403 
009204 



000000 
000001 
094353 
000002 

000001 
000006 
000005 



054353 

000006 
054352 
094351 
000012 



054351 



054353 



0S4S52 

177770 



•THIS ROUTINE IS USED 
•OCTAL (ASCII) NUMBER 
•ITYPOS-- -ENTER HERE 
•CALL: 

• NOV NUn,-( 

• TYPOS 

• .BYTE N 

• .BYTE N 
• 

• 

•ITYPON ENTER HERE 

••TYPOS OR ITYPOC 
•CALL: 

• HOV NUH,-( 

• TYPON 

•♦TYPOC-- -ENTER HERE 
•CALL: 

• NOV NUn.-( 

• TYPOC 



TO CHANGE A 16 -BIT BINARY NUMBER TO A 6 -DIGIT 
AND TYPE IT. 

TO SETUP SUPPRESS ZEROS AND NUMBER OF DIGITS TO TYPE 

SP) 1 1 NUMBER TO BE TYPED 

It CALL FOR TYPEOUT 

iiN-l TO 6 FOR NUI«ER OF DIGITS TO TYPE 
iiM-l OR 0 

iil-TTPE LEADING ZEROS 
iiO-SUPPRESS LEADING ZEROS 

TO TYPE OUT WITH THE SAME PARAMETERS AS THE LAST 



SP) 



I (NUMBER TO BE TYPED 
. I CALL FOR TYPEOUT 



FOR TYPEOUT OF A 16 BIT NUMBER 

SP) iiNUMBER TO BE TYPED 

It CALL FOR TYPEOUT 



it: 

21 ! 



31: 



41: 



MOV 


a(SP).-(SP) 


1 t PICKUP THE MODE 


MOVB 


l(SP).tOFILL 


It LOAD ZERO FILL SWITCH 


MOVB 


(SP)*.I0M0DE«1 


ti NUMBER OF DIGITS TO TYPE 


ADD 


•2.(SP) 


1 1 ADJUST RETURN ADDRESS 


BR 


•TYPON 




MOVB 


•1 . lOFILL 


II SET THE ZERO FILL SWITCH 


MOVB 


•6.I0M0DE*1 


It SET FOR SIX(6) DIGITS 


MOVB 


•5.I0CNT 


ttSET THE ITERATION COUNT 


MOV 


R3.-(SP) 


It SAVE R3 


MOV 


R4.-(SP) 


ttSAVE R4 


MOV 


R5.-(SP) 


iiSAVE R5 


MOVB 


«aH00E*l.R4 


It GET THE NUMKR OF DIGITS 


NEG 


R4 




ADD 


•6.R4 


II SUBTRACT IT FOR MAX. ALU 


MOVB 


R4.iaN00E 


1 iSAVE IT FOR USE 


MOVB 


IOriLL.R4 


1 iGCT TIC ZERO FILL SWITCH 


NOV 


12CSP).R9 


tiPICKUP THE INPUT NUMBER 


aR 


R3 


t iCLEAR THE OUTPUT WORD 
It ROTATE MS* INTO "C" 


ROL 


R9 


BR 


31 


1 tGO 00 MSB 


ROL 


1(9 


iiFORN THIS DIGIT 


ROL 


R5 




ROL 


RS 




MOV 


R5.RS 




ROL 


R3 


tiGET LSB OF THIS DIGIT 


OCCB 
BM. 


tONOOC 


It TYPE THIS DIGIT? 


61 


tiBR IF NO 


•It 


♦177770. R3 


i iGCT RIO OF JUm 




41 


iiTCST FOR 0 


TST 


M 


tiSUPMCSS THIS 07 


ICQ 


51 


ttW IF YCS 


INC 


R4 


liOON'T SUPPRESS ANYMORE 0 



TO TYPE 



CVnjASO nSVll-J memory 0I«G. macro Y05.02 
ROUTINE BINARY TO OCTAL (ASCII) AND TYPE 
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13770 


054272 


052703 


000060 




BIS 


♦•0.R3 


13771 


054276 


052703 


000040 


5»: 


BIS 


♦ ' ,R3 


13772 


054302 


110337 


054346 




MOVB 


R3.8* 


13773 


0S4S06 








TYPE 


8* 


054306 


104401 


054346 




TYPEIT 


.81 












.OSABL 


CRF 


13774 


054312 


105337 


054350 


6»: 


OECB 


lOCNT 


13775 


054316 


003347 






BGT 


2* 


13776 


054320 


002402 






BLT 


7$ 


13777 


054322 


005204 






INC 


R4 


13778 


054324 


000744 






BR 


2* 


13779 


054326 


012605 




7»: 


MOV 


(SP)».R5 


13780 


054330 


012604 






MOV 


(SP)».R4 


13761 


054332 


012603 






MOV 


(SP)».R3 


13782 


054334 


016666 


000002 000004 




MOV 


2(SP),4(SP) 


13783 


054342 


012616 






MOV 


(SP)*.(SP) 


13784 


054344 


000002 






RTI 




13785 


054346 


000 




81: 


.BYTE 


0 


13786 


054547 


000 






.BYTE 


0 


13787 


054350 


000 




lOCNT: 


.BYTE 


0 


13788 


054351 


000 




1 OF ILL: 


.BYTE 


0 


13789 


054352 


000000 




lOMOOE: 


.UORO 


0 
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SEQ 0364 



1 1 MAKE THIS DIGIT ASCII 
J {MAKE ASCII IF NOT ALREADY 
iiSAVE FOR TYPING 
mGO TYPE THIS DIGIT 



t J COUNT BY 1 

it BR IF MORE TO DO 

> iBR IF DONE 

;> INSURE LAST DIGIT ISN'T A BLANK 
mGO do the LAST DIGIT 
I » RESTORE R5 
i {RESTORE R4 
t {RESTORE R3 

tiSET THE STACK '"OR RETURNING 
s (RETURN 

ii STORAGE FOR ASCII DIGIT 
J J TERMINATOR FOR TYPE ROUTINE 
:> OCTAL DIGIT COUNTER 
! sZERO FILL SWITCH 
sjNUMBER OF DIGITS TO TYPE 



SvnjASO "SVll J tttflORY 01 AG. MACRO Y05.02 
OU^INT CONVERT BINARY TO OECIIAL AND TYPE 



13791 
13792 
13793 
1J794 
13795 
15796 
15797 
13796 
13799 
15600 
15901 



13«02 
13003 
15004 
15«05 
15S06 
13«07 
13006 
13609 
13610 
13611 
13612 
13615 
13614 
13615 
13616 
13617 
15616 
15619 
15620 
15621 
15622 
15623 
15624 
13625 
13626 
15627 
15626 
15629 
15650 
15631 
13652 
15653 
15634 
13635 
15656 
15657 



nonday 07 -Oct -65 16:57 Pag* 426 



.SBTTL ROUTINE CONVERT BINARY TO DECIMAL AND TYPE 



SEQ 0365 



054554 
0M554 
054556 
054560 
054562 
054564 
054566 
054572 
054576 
054400 
054402 
054410 
054412 
054416 
054422 
054424 
054450 
054452 
054454 
054456 
054440 
054442 
054444 
054446 
054450 
054452 
054454 
054456 
054464 
054470 
054474 
054476 
054500 
054504 
054506 
054510 
054512 
054514 
054516 
054520 
054526 
054550 
054550 
054552 
054554 
054556 
054540 



010046 
010146 
010346 
010546 
010546 
012746 
016605 
100004 
C05405 
112766 
005000 
012705 
112723 
005002 
016001 
160105 
002402 
005202 
000774 
060105 
005702 
001002 
105716 
100407 
106516 
10500S 
116663 
052702 
052702 
110223 
005720 
020027 
002746 
005002 
010502 
000764 
105726 
100005 
116665 
105013 

012605 
012603 
012602 
012601 
012600 



•THIS ROUTINE IS USED TO CHANGE 
•SIGNED DECIMAL (ASCII) NUMBER 
•NUMBER IS POSITIVE OR NEGATIVE 
•BEFORE THE FIRST DIGIT OF THE 
•REPLACED WITH SPACES. 
•CALL : 

• MOV NUM..(SP) 

• TYPDS 

ITYPDS: PUSH R0.R1.R2.R5.R5 



A 16-BIT BINARY NUMBER TO A 5-DICIT 
AND TYPE IT. DEPENDING ON WHETHER THE 

A SPACE OR A MINUS SIGN WILL BE TYPED 
NUMBER. LEADING ZEROS WILL ALUAYS BE 



:jPUT the BINARY NUMBER ON THE STACK 
I (GO TO THE ROUTINE 



MOV RO. (SP) 
MOV Rl.-(SP) 
MOV R2. (SP) 
MOV R3. (SP) 
MOV R5.-(SP) 



020200 






MOV 


♦20200. -(SP) 


isSET BLANK SWITCH AND SIGN 


000020 






MOV 


20(SP).R5 


jjGET THE INPUT NUMBER 








BPL 


1* 


: jBR IF INPUT IS POS. 








NEG 


R5 


liMAKE THE BINARY NUMBER POS. 


000055 


000001 




MOVB 


♦ • - .KSP) 


:sMAKE THE ASCII NUMBER NEG. 






1*: 


CLR 


RO 


;:ZER0 THE CONSTANTS INDEX 


054570 






MOV 


•ID6LK.R5 


I : SETUP THE OUTPUT POINTER 


000040 






MOVB 


.(R5)» 


:jSET the first CHARACTER TO A BLANK 






2«: 


CLR 


R2 


>:CLEAR the BCD Nlff«ER 


054560 






MOV 


IDTBL(RO),Rl 


s;GET THE CONSTANT 






51 : 


SUB 


R1.R5 


ijFORM THIS BCD DIGIT 








BLT 


4* 


i iBR IF DONE 








INC 


n2 


;sIN(,RcA3c THc BCD DIGIT BT 1 








BR 


5* 








4S: 


ADD 


R1.R5 


i:AOO BACK THE CONSTANT 








TST 


R2 


:t CHECK IF BCD DIGIT -0 








BNE 


5* 


SjFALL THROUGH IF 0 








TSTB 


(SP) 


i:STILL DOING LEADING 0* S? 








BMI 


71 


::BR IF YES 






5»: 


ASLB 


(SP) 


: iMSD? 








BCC 


6» 


: iBR IF NO 


000001 


177777 




MOVB 


KSP). -l(R3) 


YES -SET THE SIGN 


000060 




6<: 


BIS 


••0.R2 


isMAKE THE BCD DIGIT ASCII 


000040 




71: 


BIS 


• ' .R2 


siMAKE IT A SPACE IF NOT ALREADY A DIGIT 








MOVB 


R2.(R3). 


;:PUT THIS CHARACTER IN THE OUTPUT BUFFER 








TST 


(RO). 


iiJUST INCREMENTING 


000010 






CMP 


R0.«10 


ii CHECK THE TABLE INDEX 






BLT 


21 


s iGO DO THE NEXT DIGIT 








BGT 


61 


iiCO TO EXIT 








MOV 


R5.R2 


iiGET THE LSD 








BR 


6$ 


i:GO CHANGE TO ASCII 






e«: 


TSTB 


(SP)* 


s:WAS THE LSD THE FIRST NON-ZERO? 








BPL 


9t 


tiBR IF NO 


177777 


177776 




MOVB 


-1(SP).-2(R5) 


i J YES- -SET THE SIGN FOR TYPING 


91: 


CLRB 


{R5) 


IS SET THE TERMINATOR 








POP 


R5.R5.R2.R1.ro 





MOV 
MOV 
MOV 
MOV 
MOV 



(SP) 
(SP) 
(SP) 
(SP) 
(SP) 



,R5 
.R3 
.R2 
,R1 
.RO 



CVMJA80 MSVll J MEMORY OI*G. MACRO Y05.02 
ROUTINE CONVERT BINARY TO DECIMAL ANO TYPE 
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13838 054542 
054542 

1M59 0S4S46 

13840 054554 

13841 054556 

13842 054560 

13843 054562 

13844 054564 

13845 054566 

13846 054570 
054576 



104401 054570 



016666 
012616 

000002 
023420 
001750 
000144 
000012 
000000 
000000 



000002 000004 



IDT8L I 



000000 000000 lOBLKi 



SEQ 0366 



TYPE 

TYPEIT 

.DSABL 

MOV 

MOV 

RTl 

10000. 

1000. 

100. 

10. 

.WORD 



tOBLK 

.tOBLK 

CRF 

2CSP).4(SP) 
CSP)».(SP) 



0.0.0.0 



::N0U TYPE THE NUMBER 

AO JUST THE STACK 
::RETURN TO USER 



CVMJA80 MSVll J MEMO«T DIAC. 
ROUTINE TTY INPUT 

13848 
15849 
138S0 
13651 
1S852 
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SBTTL ROUTINE TTY INPUT 



SEQ 0367 



i*SOFTUARE SWITCH REGISTER CHANGE ROUTINE. 
{•ROUTINE IS ENTERED FROM THE TRAP HANDLER. AND WILL 
i*SERVICE THE TEST FOR CHANGE IN SOFTUARE SWITCH REGISTER TRAP CALL 
s*WHEN OPERATING IN TTY FLAG MODE. 



13854 










. ENABLE 


LSB 


138S5 


054600 






tCKSWR: 






13856 


054600 


005737 


047154 




TST 


XOCHAR 


13857 


054604 


001406 






BEQ 


NOCH 


13858 


054606 


013746 


047154 




MOV 


XOCHAR , - ( SP ) 


13859 


054612 


005037 


047154 




CLR 


XOCHAR 


13860 


054616 


000137 


054640 




JMP 


CONTSl 


13861 


054622 


105777 


126014 


NOCH: 


TSTB 


aiTKS 


13862 


054626 


100136 






BPL 


SURENO 


13863 


054630 


117746 


126010 




MOVB 


StTKB. -(SP) 


13864 


054634 


042716 


177600 




BIC 


♦tC177,(SP) 


13865 


054640 


022716 


000006 


CONTSl : 


CMP 


#6.(SP) 


13866 


054644 


001002 






BNE 


11 


13867 


054646 


C04737 


040762 




CALL 


FIELOSERVICE 


13868 


054652 


022716 


000024 


It : 


CMP 


♦24 . ( SP ) 


13869 


054656 


001002 






BNE 


161 


13870 


054660 


004737 


055222 




CALL 


CONTT 


13871 


054664 


022716 


000003 


16t: 


CMP 


♦3 . C SP ) 


13872 


054670 


001454 






BEQ 


51 


13873 


054672 


022716 


000023 


21 : 


CMP 


♦23, (SP) 


13874 


054676 


001002 






BNE 


171 


13875 


054700 


004737 


055276 




CALL 


CONTS 


13876 


054704 


022716 


000013 


17$; 


CMP 


#13. (SP) 


13877 


054710 


001005 






BNE 


6> 


13878 


054712 








TYPE 


♦CNTLK 




054712 


104401 


055214 




TYPEIT 


, ICNTLK 












. OSABL 


CRF 


13879 


054716 


01:>/06 


002146 




MOV 


CTLKVEC.SP 


13880 


054722 


000207 






RETURN 




13881 


054724 


022737 


000176 002636 


6t : 


CMP 


♦SWREG . SWR 


13882 


054732 


001075 






BNE 


CKENO 


13883 


054734 


022716 


000007 




CMP 


♦7 . ( SP ) 


13884 


054740 


001072 






BNE 


CKEND 


13885 


054742 


005737 


002062 




TST 


tAUTO 


13886 


054746 


001067 






BNE 


CKEND 


13887 


054750 








TYPt 


ICNTLG 


054750 


104401 


056020 




TYPtlT 


, ICNTLG 














13888 


054754 






IGTSUR : 


TYPE 


insuR 


054754 


104401 


056025 




TYPEIT 


.IMSWR 












.OSABL 


CRF 


13889 


054760 








TYPOCT 


SSWR 


054760 


017746 


1<;S652 




MOV 


8SWR.-(SP) 




054764 


104402 






TYPOC 














.OSABL 


CRF 


13890 


054766 








TYPE 


«MNEW 




054766 


104401 


056036 




TYPEIT 


.IMNEW 












.OSABL 


CRF 


13891 


054772 


005046 




3t: 


CLR 


-(SP) 


13892 


054774 


005046 






CLR 


-(SP) 


13893 


054776 


105777 


125640 


4<: 


TSTB 


81 IKS 



! i SOMETHING 
CO ON IF 
USE IT 



! > 

; I 



THERE? 
NOT 



AROUND 



STACK IS SCREWED UP! 



::CHAR THERE? 
1 1 IF NO. DON'T WAIT 
11 SAVE THE CHAR 
J I STRIP-OFF THE ASCII 
sis IT CONTROL F? 
iNO SKIP 

IS IT CONTROL T? 
NO - SKIP 

YES - CALL CONTROL T ROUTINE 

IS IT CONTROL C7 
I YES EXIT •••••NOTE 
J IS IT CONTROL S? 
:N0 - SKIP 

sYES - CALL CONTROL S ROUTINE 
:IS IT CONTROL K? 
;N0 - SKIP 
:TYPE A tK 



jRESET KSP TO AFTER PATTERN EXEC ROUTINE 

: RETURN TO PATTERN EXEC ROUTINE 

jjIS THE SOFT-SWR SELECTED? 

i .BRANCH IF NO 

ttIS IT A CONTROL G? 

Si NO. RETURN TO USER 

J ARE UE RUNNING IN AUTO-MODE? 

: BRANCH IF YES 

s;ECHO THE CONTROL -G (tC) 



(ilYPE CURRENT CONTENTS 



SiOF THE SWR 

siSAVE SSWR FOR TYPEOUT 

t:GO TYPE--OCTAL ASCIKALL DIGITS) 



1 1 



PROMPT FOR NEW SWR 



: (CLEAR COUNTER 
ssTHE NEW SWR 
iiCHAR THERE? 



cvnjA80 


MSVll-J 


MEMORY 


DIAG. 


MACRO 


ROUTINE 


TTY INPUT 






13894 


055002 


1003-'5 






15895 


055004 


117746 


125634 




13896 


055010 


042716 


X f row 




13897 


055014 


021627 


000003 




13898 


055020 


001006 






13899 


055022 








055022 


104401 


056006 




13900 


0SS026 


062706 


000006 




13901 


055032 


000137 






13902 


055036 


021627 


000025 




13903 


055042 


001005 






13904 


055044 










055044 


104401 


056013 




13905 


055050 


AA t^AA. 

062706 


000006 




13906 


AH ASA 

05S0S4 


AAA^A A 

000746 






13907 


AH ASA 

055056 


021627 


000015 




13908 


AH AA ^ 

055062 


001024 






13909 


AH AA M 

055064 


C05766 


000004 




13910 


AH A^ A 

055070 


AA 4 AAV 

001409 




125536 


13911 


AH A^ O 

055072 


At XX 

016677 


000002 


13912 


AK K t AA 

055100 










AKK 4 AA 

055100 


005737 


002566 






0551O4 


AA4 AAV 






13913 


055106 


062706 


000006 




13914 


055112 










055112 


000402 


















055114 


062706 


www A V 




13916 


055120 










055120 








13917 


055120 










055120 


104401 


002660 




13918 


055124 


000002 
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SEQ 0368 



5$: 

71: 

8»: 
9$: 

101: 



BPL 
MOVB 
BIC 
CMP 
BNE 
TYPE 
TYPEIT 
.DSABL 
ADO 
JMP 
CMP 
BNE 
TYPE 
TYPEIT 
.DSABL 
ADO 
BR 
CMP 
BNE 
TST 
BEQ 
MOV 



41 

8*TKB.-(SP) 
#tC177.(SP) 
(SP).#S 
7» 

ICNTLC 
.ICNTLC 
CRF 
*6.SP 

QUIT 

(SP),*25 
91 

♦CNTLU 
. »CNTLU 
CRF 
«6.SP 
3( 

(SP).»15 
13* 
4(SP) 
10« 

2(SP).8SUR 



IF SURFLG IS TRUE 



ADO «6.SP 

ELSE 



ADD »10.SP 

END 

TYPE »CRLF 

TYPEIT . ICRLF 

.DSABL CRF 
SUREND: RTI 



tilF NOT TRY AGAIN 

itPICK UP CHAR 

iiMAKE IT 7-BIT ASCII 

Ills IT A CONTROL -C? 

I {BRANCH IF NOT 

11 YES. ECHO CONTROL -C ( tC) 



IS CLEAN UP STACK 

I > CONTROL -C HALT 

Ills IT A C0NTR0L-U7 

iiBRAI'iCH IF NOT 

1 1 YES. ECHO CONTROL -U (tU) 



11 IGNORE PREVIOUS INPUT 
;, LET'S TRY IT AGAIN 
;jIS IT A <CR>? 
i (BRANCH IF NO 

j;YES. IS IT THE FIRST CHAR? 
i {BRANCH IF YES 
::SAVE NEW SUR 



: I CLEAR UP STACK 

: {CLEAR UP STACK 
{{ECHO <CR> AND <LF> 
{ {RETURN 



TST SURFLG 
BEQ L514 



BR L515 
LS14: { { I i { { 



L515: 



CVrijABO MSVll-J MEMORY OIAG. 
R(WTINE TTY INPUT 
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SEQ 0369 



1391<* 
13920 
13921 
13922 
13923 
13924 
13925 
13926 
13927 
13928 
13929 
13930 
13931 
13932 
13933 
13934 
13935 



055126 
055132 
055134 
055140 
055144 
055146 
055152 
055154 
055160 
055164 
055166 
055170 
055172 
055174 
055200 
055204 
055206 
055206 



13936 055212 

13937 055214 
055217 

13938 
13939 



062706 


000002 


CKENO: 


ADD 


♦2.SP 


000002 






RTI 




004737 


047156 


13$: 


CALL 


♦TYPEC 


021627 


000060 




CMP 


(SP).#60 


002420 






BLT 


15* 


021627 


000067 




CMP 


(SP).#67 


003015 






BGT 


15* 


042726 


000060 




BIC 


♦60, (SP)* 


005766 


000002 




TST 


2(SP) 


001403 






BEQ 


14* 


006316 






ASL 


(SP) 


006316 






ASL 


(SP) 


006316 






ASL 


(SP) 


005266 


000002 


14*: 


INC 


2(SP) 


056616 


177776 




BIS 


-2(SP).(SP) 


000674 






BR 


4* 






151 : 


TYPE 


*QUES 


104401 


002657 




TYPEIT 


.*QUES 
CRF 




.OSABL 


C00716 






BR 


8* 


136 


113 


015 ICNTLK: 


.ASCIZ 


/tK/<15><12> 


012 


000 












.EVEN 
.OSABL 


LSB 



(FIX STACK 
RETURN 
J ECHO CHAR 
jCHAR < 0? 
I BRANCH IF YES 
jCHAR > 7? 
{BRANCH IF YES 
I STRIP -OFF ASCII 
IS THIS THE FIRST CHAR 
BRANCH IF YES 
NO. SHIFT PRESENT 
CHAR OVER TO MAKE 
ROOM FOR NEW ONE. 
KEEP COUNT OF CHAR 
SET IN NEW CHAR 
GET THE NEXT ONE 
TYPE ?<CR><LF> 



! ; SIMULATE CONTROL -U 
: CONTROL K ASCII STRING 



CVMJABO MSVll-J MEMORY OIAG. 
ROUTINE TTY INPUT 

13942 055222 
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SEQ 0370 



1394S 055222 
055222 

13944 055224 
055224 

13954 055230 
055230 
055234 

13955 0SS2S« 
0SS2S6 

13956 055242 
055242 

13957 055242 
055242 

13956 055246 
055246 
055252 
055254 
055255 

13959 0SS2S6 
055256 

13960 055262 
055262 
055266 
055270 
055271 

13964 055272 
055272 

13965 055274 
13966 



CONTT 
! ^SUBTEST 



SUBTST <<C0NTR0L T>> 
CONTROL T 



010046 

104401 002660 



005737 002126 
001402 

104401 070474 



104401 070510 



013746 002102 
104403 

003 
000 



104401 070516 



013746 002300 
104403 

002 
000 



012600 
000207 



PUSH 

TYPE 

TYPEIT 

.OSABL 



RO 

»CRLF 
.ICRLF 
CRF 



IF RLFLAG IS TRUE 



TYPE MSG092 
TYPEIT ,MSG092 
.DSABL CRF 

ENO I OF IF RLFLAG 

TYPE MSG093 
TYPEIT .MSG093 
.OSABL CRF 

TYPOCS BANK.. 3 

MOV 
TYPOS 
.BYTE 
.BYTE 



■RELOCATED 



(BANK' 



MOV RO,-(SP) 



TST RLFLAG 
BEQ LS16 



L516: i I t I ( I 



BANK.-(SP) 

3 
0 



.DSABL CRF 

TYPE MSG095 

TYPEIT .MSG095 

.OSABL CRF 

TYPOCS REALPAT , 

MOV REALPAT. -CSP) 
TYPOS 

.BYTE 2 

.BYTE 0 

.OSABL CRF 

POP RO 

RETURN 



I TYPE 3 DIGITS 
:{SAVE BANK FOR TYPEOUT 
jiGO TYPE- -OCTAL ASCII 
:;TYPE 3 DIGIT(S) 
i> SUPPRESS LEADING ZEROS 

;PAT" 



.2 {TYPE 2 DIGITS 

: J SAVE REALPAT FOR TYPEOUT 

:jGO type- -octal ASCII 

:;TYPE 2 DIGIT(S) 

:: SUPPRESS LEADING ZEROS 



MOV (SP)*.RO 
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CONTROL S e CONTROL Q 



SEO 0371 



19967 055276 



CONTS: SUBTST <<CONTROL S £ CONTROL Q>> 



13968 

19969 
13970 
13971 
13972 
13973 



13974 
13975 



13976 
13977 



055276 
055276 
055300 
055304 
055306 
055312 
055316 
055316 
055322 
055324 
055330 
055390 
055332 
0SS332 
0S5SS4 
055334 



012600 
105777 
100375 
117716 
042716 

021627 
OOlOOS 
000137 

000401 

C00762 



125336 

125332 
177600 

000021 

054640 



i*SUBTEST 



CONTROL S e CONTROL Q 



C0NTS2: 



POP 

TSTB 
BPL 

novB 

BIC 



RO 

8«TKS 
C0NTS2 
8»TKB.(SP) 
♦tC177.(SP) 



IF (SP) EQ *21 



JMP 
ELSE 



CONTSl 



BR C0NTS2 
END sOF IF (SP) 



iGET RIO OF RETURN ADDRESS FROM STACK 

nOV (SP)*.RO 

I WAIT FOR CHARACTER 

(REPLACE OVER OLD CHARACTER ON STACK 
i STRIP ALL BUT ASCII 
ilF IT IS A CONTROL Q 

CMP (SP),t21 
BNE LS17 



BR L520 
LS17: : i I i : I 



L520:::iis> 



CVMJAeO HSVll-J nEnORY DIAG. 
CONTROL S C CONTROL Q 



13979 
15960 
13981 
13982 
13983 
13964 
1398S 
13986 
13987 
13988 
13989 
13990 
13991 
13992 
13995 
13994 
13995 
13996 
13997 
13998 
13999 
14000 
14001 
14002 
14003 
14004 
14005 
14006 
14007 
14008 
14009 
14010 
14011 
14012 
14013 
14014 
14015 
14016 
14017 
14018 
14019 
14020 
14021 
14022 
14025 
14024 
1402S 
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SEQ 0372 



055334 
055536 
055344 
055550 
055352 
055560 
055366 
055374 
055376 
055402 
0S5404 
055410 
055414 
055420 
055422 
055424 
055432 
055434 
055442 
055444 
055452 
055454 
055462 



011646 
016666 
105777 
100375 
117766 
042766 
026627 
001013 
105777 
100375 
117746 
C42716 
022627 
001366 
000750 
026627 
001744 
026627 
002407 
026627 
003005 
042766 
000002 



14026 
14027 
14028 
14029 
14050 
14031 
14032 
14035 



055464 
055466 
055470 
055474 
055500 
055502 
055504 
055506 
055512 
055514 
055514 

055520 
055522 
055524 
055532 
055534 
055540 
055544 
055550 



i*THIS ROUTINE UILL INPUT A SINGLE CHARACTER FRON THE TTY 
i *CALL : 
I* RDCHR 
i* RETURN HERE 

t 







IRDCHR: 


MOV 


(SP). -CSP) 


1 iPUSH OOUN THE PC 


000004 


000002 




nov 


4(SP).2(SP) 


J iSAVE THE PS 


125272 




11: 


TSTB 


8*TKS 


i iUAIT FOR 








BPL 


1* 


1 1 A CHARACTER 


125266 


000004 




MOVB 


8«TKB.4(SP} 


1 tREAD THE TTY 


177600 


000004 




BIC 


♦tC<177>,4(SP) 


t (GET RID or JUNK IF ANY 


000004 


000023 




CMP 


4( SP ) . #23 


tilS IT A C0NTR0L-S7 








BNE 


3f 




125240 




2«: 


TSTB 


8«TKS 


muait for a character 








BPL 


21 


mLOOP UNTIL ITS THERE 


125234 






HOVB 


8liKB.-(SP) 


i;GET CHARACTER 


177600 






BIC 


♦tC177.(SP) 


II MAKE IT 7 -BIT ASCII 


000021 






CMP 


(SP)*.#21 


ills IT A C0NTR0L-Q7 








BNE 


2« 


It IF NOT DISCARD IT 








BR 


It 


s;YES. RESUME 


000004 


000021 


S»: 


CMP 


4(SP).«21 


it IS IT A RANDOM CONTROL -07 






BEQ 


11 


i {BRANCH BACK IF SO 


000004 


000140 




CMP 


4(SP).#140 


ttIS IT UPPER CASE? 








BLT 


41 


it BRANCH IF YES 


000004 


000175 




CMP 


4(SP).#175 


;tIS IT A SPECIAL CHAR? 








BGT 


4t 


i t BRANCH IF YES 


000040 


000004 




BIC 


«40.4(SP) 


tiMAKE IT UPPER CASE 






4t: 


RTI 




i iGO BACK TO USER 



INPUT A SINGLE CHARACTER FROM THE TTY 
CHARACTER IS ON THE STACK 
WITH PARITY BIT STRIPPED OFF 



iR-C 
sR-C 







SETHIS 


ROUTINE 


UILL INPUT 






i*CALL: 










5* 


RDLIN 








f • 


RETURN 


HERE 


010346 




I* 

tRDLIN: 


MOV 


R3.-(SP) 


005046 






CLR 


-(SP) 


012703 


055762 


1«: 


MOV 


♦♦TTYIN.R3 


022705 


056006 


2t: 


CMP 


«$TTYIN*20 


101477 






BLOS 


8* 


104411 






RDCHR 




112613 






MOVB 


(SP)».(R5) 


122713 


000003 




CMPB 


•S.(R3) 


001016 






BNE 


3« 








TYPE 


♦CNTLC 


104401 


056006 




TYPEIT 


.♦CNTLC 








.DSA6L 


CRF 


005726 






TST 


(SP)» 


012603 






MOV 


(SP)».R5 


032777 


000400 125104 




BIT 


•eiT8.8SUR 


001404 






BEQ 


11* 


005057 


002420 




CLR 


STOPOK 


000157 


040512 




JMP 


EXIT 


000157 


040442 


lit: 


JMP 


QUIT 


122713 


000177 


31: 


CMPB 


#177. (R3) 



iiINPUT A STRING FROM THE TTY 

it ADDRESS OF FIRST CHARACTER UILL BE ON THE STACK 
It TERMINATOR UILL BE A BYTE OF ALL O'S 
It SAVE R3 

itCLEAR THE RUBOUT KEY 
tiGET ADDRESS 
tt BUFFER FULL? 
j;BR IF YES 

isGO READ ONE CHARACTER FROM THE TTY 

: iGET CHARACTER 

silS IT A CONTROL -C? 

11 BRANCH IF NO 

IS TYPE A CONTROL C (tC) 



IS CLEAN RUBOUT KEY OFF OF THE STACK 
t {RESTORE R5 

tilS THERE A HALT FLAG SET IN THE SUR? 

i t BRANCH IF NOT TO HALT ROUTINE 

: {GET READY TO HALT PROGRAM 

tiGO HALT PROGRAM 

St GOTO CONTROL -C HALT 

s:IS IT A RUBOUT 



CVMJA80 MSVll J MEMORY DIAG. 
CONTROL S C CONTROL Q 



14054 055554 

14055 055556 

14056 055560 
14037 0SSS62 
I4OS0 0SSS70 

055370 

14059 055574 

14040 055600 

14041 055602 

14042 055606 
14045 055610 

14044 055614 
055614 

14045 055620 

14046 055622 

14047 055624 
14040 055626 

14049 055654 
055654 

14050 055640 

14051 055642 

14052 055646 

14053 055650 
055650 

14054 0SS6S4 

14055 055656 

14056 055662 

14057 055664 
14056 055666 

055666 

14059 0SS672 
055672 

14060 055676 

14061 055700 
0SS700 

14062 0SS704 
1406S 0SS706 

14064 0SS712 
0SS712 

14065 055716 

14066 055722 

14067 055724 
14066 OSS730 

0SS750 

14069 055754 

14070 055736 

14071 0SS740 

14072 055742 
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001022 








BNE 


5< 


005716 








TST 


CSP) 


001007 








BNE 


4$ 


112757 


000154 


055760 




MOVB 


\.10« 








TYPE 


lot 


104401 


055760 






TYPEIT 
.OSABL 


.lot 

CRF 


012716 


177777 






MOV 


♦-l.(SP) 


005505 






41: 


DEC 


R3 


020527 


055762 






CMP 


R5,#tTTYIN 


105454 








BLO 


St 


111557 


055760 






MOVB 


(R5).10t 








TYPE 


lot 


104401 


055760 






TYPEIT 
. OSABL 


.lot 

CRF 


000725 








BR 


2t 


005716 






St : 


TST 


(SP) 


001406 








BEQ 


6t 


112757 


000134 


055760 




MOVB 
TYPE 


♦ N.lOt 

lot 


104401 


055760 






TYPEIT 


.lot 

CRF 










. OSABL 


005016 








CLR 


CSP) 


122715 


000025 




61 : 


CMPB 


•25. CR3) 


001005 








BNE 

TYPE 


7t 

tCNTLU 


104401 


056013 






TYPEIT 


. tCNTLU 








.OSABL 


CRF 


000705 








BR 


It 


122715 


000022 




71 : 


CMPB 


•22. (R3) 


001011 








BNE 


9t 


105015 








CLRB 
TYPE 


CR3) 
tCRLF 


104401 


002660 






TYPEIT 


, tCRLF 








. OSABL 
TYPE 


CRF 

tTTYIN 


104401 


0SS762 






TYPEIT 


. tTTYIN 








. OSABL 


CRF 


000676 






61 : 


BR 

TYPE 


2t 

tQUES 


104401 


002657 






TYPEIT 


, tOUES 








. OSABL 


CRF 


000671 








BR 


It 


111337 


055760 




91 : 


MOVB 


(R3).10t 






TYPE 


lot 


104491 


OSS 760 






TYPEIT 


.lot 






.OSABL 


CRF 


122723 


OOOOIS 






CMPB 


#15, (R3]* 


001264 








BNE 


2t 


1 AC AAV 


XI 1 1 1 1 






ri OB 


-11 3 








TYPE 


tLF 


104401 


002661 






TYPEIT 
.OSABL 


• tLF 
CRF 


005726 








TST 


(SP)» 


012605 








MOV 


(SP)*.R5 


011646 








MOV 


(SP).-(SP) 


016666 


000004 


000002 




MOV 


4(SP).2CSP) 



430-1 

SEQ 0373 
t iBR IF NO 

tilS THIS THE FIRST RUBOUT? 

liBR IF NO 

iiTYPE A BACK SLASH 



J J SET THE RUBOUT KEY 
> (BACKUP BY ONE 
U STACK EMPTY? 
1 1 BR IF YES 

M SETUP TO TYPEOUT THE OELETEO CHAR. 
11 GO TYPE 



tiGO READ ANOTHER CHAR, 
t i RUBOUT KEY SET? 
iiBR IF NO 
(sTYPE A BACK SLASH 



: s CLEAR THE RUBOUT KEY 
;:IS CHARACTER A CTRL U? 
iiBR IF NO 

; J TYPE A CONTROL "U" 



:iGO START OVER 

J lis CHARACTER A "tR-? 

; {BRANCH IF NO 

:: CLEAR THE CHARACTER 

j;TYPE A -CR" C "LF" 



( J TYPE THE INPUT STRING 



> :G0 PICKUP ANOTHER CHACTER 
s;TYPE A •?• 



ti CLEAR THE BUFFER '•HO LOOP 
:sECHO THE CHARACTER 



St CHECK i-'OR RETURN 
] iLOOP IF NOT RETURN 
J .CLEAR RETURN (THE 15) 
J (TYPE A LINE FEEO 



:i CLEAN RUBOUT KEY FROM THE STACK 
: {RESTORE RS 

s: ADJUST THE STACK AND PUT ADDRESS OF THE 
FIRST ASCII CHARACTER ON IT 



CvnjASO nsvii-j nEnoRY oiag. 

CONTROL S 6 CONTROL Q 
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SEQ 0574 



14075 


055750 


012766 


053 7d2 


AAAAAA 

ooooo# 




nov 


#ITTYIH,#l 5H J 


14074 


055756 


000002 








RTI 




14075 


055760 


000 






6 A A 

101 ; 


.oYTt 


A 

0 


14076 


055761 


AAA 

000 








.oYTt 


A 

0 


14077 


0SS762 


AAAA'^ A 

000024 






• T T YIN: 


.MtPT 


^A 

20. 


14000 


056006 


4 

156 


105 


A6 C 

015 


•CNTLC : 


. ASCIZ 


/*C/ <15><12> 




056011 


012 


ooo 










14081 


096015 


15o 


125 


015 


ICNTLU: 




/TU/<15><X2> 




056016 


OX2 


AAA 

OOO 










1 AAA? 






A V ■ 




V 1 ■ 








056023 


012 


000 










14063 


056025 


015 


012 


123 


inSUR: 


.ASCIZ 


<15><12>/SMR • / 




0560S0 


127 


122 


040 










056033 


075 


040 


000 








14064 


056036 


040 


040 


116 


IMNEU: 


.ASCZZ 


/ NEU - / 




056041 


105 


127 


040 










056044 


075 


040 


000 









I (RETURN 

11 STORAGE FOR ASCII CHAR. TO TYPE 
i I TERniNATOR 

I (RESERVE SIZE BYTES FOR TTY INPUT 

; (CONTROL "C" 

((CONTROL "U" 

( (CONTROL "G" 



14065 



.EVEN 



CvnjAaO nSVll J MEnORY OZAC. macro Y05.02 
ROUTINE READ AN OCTAL NUMBER FROH THE TTY 



14067 
14066 
14069 
14090 
14091 
14092 
14093 
14094 
14095 
14096 
14097 
14096 
14099 
14100 
14101 



14102 
14103 
14104 
14105 
14106 
14107 
14106 
14109 
14110 
14111 
14112 
14113 
14114 
14115 
14116 
141*7 
141i.6 
14119 
14120 
14121 
14122 
14123 
14124 
14125 



14126 
14127 
14126 
14129 



Henday 07 -Oct 65 16:57 Pag* 431 



.S8TTL ROUTINE READ AN OCTAL NUMBER FROn THE TTY 



SEQ 0375 



056050 
056052 
056060 
056060 
056062 
056064 
056066 
056070 
056072 
056076 
056100 
056102 
056104 
056106 
056112 
056114 
056120 
056122 
056124 
056126 
056130 
056132 
056134 
056136 
056142 
056144 
056146 
056150 
056154 
056160 
056160 
056162 
056164 
056166 
056170 
056172 
056174 
056174 



14130 056176 

14131 056200 
056200 

14132 056204 
056204 



011646 
016666 

010046 
010146 
010246 
104412 
C12600 
010037 
005001 
005002 
112046 
001420 
122716 
003026 
122716 
002423 
006301 
006102 
006301 
006102 
006301 
006102 
042716 
062601 
000756 
005726 
010166 
010237 

012602 
012601 
012600 
000002 
005726 
105010 

104401 

000000 

104401 



104401 



000004 000002 



056176 



*THIS ROUTINE WILL READ AN OCTAL (ASCII) NUMBER FROH THE TTY AND 
*CHANGE IT TO BINARY. 

*THE INPUT CHARACTERS UILL BE CHECKED TO INSURED THEY ARE LEGAL 
*0CTAL DIGITS. IF AN ILLEGAL CHARACTER IS READ A -7- UILL BE TYPED 
•FOLLOWED BY A CARRIAGE RETURN -LINE FEED. THE COMPLETE NUMBER MUST 
•THEN BE RETYPED. THE INPUT IS TERMINATED BY TYPING A CARRIAGE RETURN. 
•CALL : 

• RDOCT 1 1 READ AN OCTAL NUMBER 

RETURN HERE it LOU ORDER BITS ARE ON TOP OF THE STACK 

i (HIGH ORDER BITS ARE IN IHIOCT 
t I PROVIDE SPACE FCR THE 
,,I>«Pi'T NUMBER 



♦RDOCT : 



MOV 
MOV 
PUSH 



(SP).-(SP) 
4(SP).2(SP) 
R0.R1.R2 



11: 



2*. 



000060 
000067 



177770 



000012 
056216 



31: 



41: 



51; 



070046 
070066 



RDLIN 

MOV 

MOV 

CLR 

CLR 

MOVB 

BEQ 

CMPB 

BGT 

CMPB 

BLT 

ASL 

ROL 

ASL 

ROL 

ASL 

ROL 

BIC 

ADO 

BR 

TST 

MOV 

MOV 

POP 



RTI 

TST 

CLRB 

TYPE 

TYPEIT 

.OSABL 

.UORO 

TYPE 

TYPEIT 

.OSABL 

TYPE 

TYPEIT 



(SP)*.RO 

R0.5I 

Rl 

R2 

(RO)*.-(SP) 
SI 

#'0.(SP) 
41 

♦•7.(SP) 

41 

Rl 

R2 

Rl 

R2 

Rl 

R2 

♦tC7.(SP) 

(SP)».R1 

21 

(SP)* 
R1.12(SP) 
R2,IHI0CT 
R2.R1.ro 



(SP)» 
(RO) 



CRF 
0 

MSG062 

.MSG062 

CRF 

MSG063 
.MSG063 



I iREAO AN ASCIZ LINE 

: nGET ADDRESS OF 1ST CHARACTER 

I (AND SAi<E IT 

I I CLEAR DATA UORO 

I (PICKUP THIS CHARACTER 
1 1 IF ZERO GET OUT 
It MAKE SURE THIS CHARACTER 
Ills AN OCTAL DIGIT 



ii»2 
1 1*6 

tt STRIP THE ASCII JUNK 
it ADO IN THIS DIGIT 
iiLOOP 

1 1 CLEAN TERMINATOR FROM STACK 
1 1 SAVE THE RESULT 



1 1 RETURN 

1 1 CLEAN PARTIAL FROM STACK 

it SET A TERMINATOR 

II TYPE UP THRU THE BAD CHAR. 



MOV R0.-(SP3 
MOV Rl.-(SP) 
MOV R2.-(SP) 



MOV (SP)*.R2 
MOV (SP)«.R1 
MOV (SP)*.RO 



I INPUT MUST BE A 



iN OCTAL 



CVMJAeo nSVll-J KHORY OIAC. MACRO Y05.02 
ROUTINE RCAO AN OCTAL NUMBER FROM THE TTY 
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SEQ 0376 



14133 056210 
056210 



141S4 
14135 
14136 
141S7 
14156 
141S9 
14140 
14141 
14142 
1414S 
14144 
14145 
1414« 
14147 
14146 
14149 
14190 
141S1 
141S2 



1415? 
14154 
14155 
141M 
141S7 
14156 
14159 
14160 
14161 
14162 
14163 
14164 
1416S 
14166 
14167 
14166 
14169 
14170 
14171 
14172 
1417$ 
14174 
14175 
14176 
14177 
14176 
14179 
14160 
14161 
14162 
14163 



056214 
056216 



104401 070077 

000724 
000000 



096220 
096222 
096230 
096230 
056252 
096234 
096236 
096240 
096242 



096290 
096292 
09*296 
096260 







IHIOCT ; 



.OSABL CRT 

TYPE nSG064 

TYPEIT .HSG064 

.OSABL CRF 

BR II 

.yoRO 0 

.SBTTL ROUTINE READ A 



I NUMBER 



1 1 TRY AGAIN 

1 1 HIGH ORDER BITS 60 HERE 
OECiriAL NUMBER FROM THE TTY 



*THIS ROUTINE UILL READ A DECIMAL (ASCII) NUMBER FROM THE TTY AND 
•CHANGE IT TO BINARY. IF TOO MANY CHARACTERS OR ANY ILLEGAL CHARACTERS 
•ARE READ A -?- FQLLOUEO BY A CARRIAGE RETURN-LINE FEED UILL BE TYPED. 
•THE COMPLETE KJMBER MUST BE RETYPED. THE I>^ IS TERMINATED BY THE 
•USER TYPING A CARRIAGE RETURN. THE RANGE OP THE INPUT NUMBER IS 
•POSITIVE 32767 TO NEGATIVE 32768. 
•CALL* 

• ' ROOEC ;iREA0 A DECIMAL NUTVER 

• RETURN HERE i (NUMBER IS ON TOP OF THE STACK 



011646 

016666 000004 000002 

010046 
010146 
010246 
104412 
012600 

010037 096366 

009046 

009002 

122710 000099 
001001 
112002 
112001 
001424 
122701 
003052 

122701 000071 
002427 

0S2716 170000 
001024 
006316 
011646 
006316 
006316 
062616 
102416 

162701 000060 
060116 
102412 
000792 
009702 
001401 
005416 

012666 000012 



11: 



2»i 



51: 
4t: 



MOW 


f CP ) . f CP ) 


i 1 PROVIDE SPACE FOR 


Mnw 




1 I THE INPbT NUMBER 




DA PI Pp 




RDLXN 




1 iREAD AN ASCIZ LINE 


NOV 


(SP)* RO 


tiAOQRESS OF 1ST CHAR 


NOV 


R0.6I 


1 1 SAVE INCASE OF BAD INPUT 


CLR 


-(SP) 


II CLEAR DATA UORO 


aR 


R2 


tiSIGN SET POSITIVE 


CMPB 


-.CRO) 


iiSEE IF A MINUS SIGN MAS TYPf 


BNE 


21 


1 iBR IF NO MINUS SIGN 


MOVB 


(R0)*.R2 


II SAVE FOB LATER USE 


MOVB 


CR0)*.R1 


II PICKUP THIS CHARACTER 


BEB 


51 


iiGCT OUT IF ZERO 


CMPB 


•'O.Rl 


iiNAKE SURE THIS CHARACTER 


BGT 


5t 


iiIS A DIGIT BETWEEN 0 6 9 


CMPB 


•'9.R1 




BLT 


5t 




BIT 
BNE 


•tC7777.(SP) 


iiOON'T LET NUMKR GET TO BIG 


51 


II BR IF NUMBER UOULD OVERFLOU 


ASL 


(SP) 


11*2 


NOV 


(SP).-(SP) 


II SAVE FOR LATER 


ASL 


(SP) 


^•4 


ASL 


(SP) 


ii^6. 


ADO 


(SP)».(SP) 


ii«10. 


BVS 


5« 


iiOVCRFLON ISN'T ALLOUED 


SUB 


•'O.Rl 


iiSTRIP AIIAY THE ASCII JUM( 


ADO 


Rl.(SP) 


i lAOO IN THIS DIGIT 


BVS 


Si 


iiOVCRFLOU ISN'T ALLOUED 


BR 


2t 


i {LOOP 


TST 


R2 


iiCMECK IF NUMBER IS NEG 


BEB 


41 


iiBR IF NO 


NEC 


(SP) 


ii YES "NEGATE THE NUMBER 


MOV 


(SP)*.12(SP) 


iiSAVE THE RESULT 


POP 


R2.R1.ro 





MOV RO.-(SP) 
MOV Rl.-(SP) 
MOV R2.-(SP) 



CvrijABO 
ROUTINE 



14104 
14195 
141S6 
141S7 
141SS 



14169 
14190 



14191 
14192 
14193 



MSVll-J 


rcnoRY 


DIAG. MACRO Y05.02 


Monday 07 -Oct -85 16:57 


Pag* 431-2 


READ A 


OECinAL 


NUnSER FROM THE TTY 






0S6SS0 


012602 










056352 


012601 










056354 


012600 










056356 


000002 




RTI 




t i RETURN 


056560 


005726 


5*: 


TST 


(SP)» 


itCLEAN PARTIAL NUMBER 


056362 


105010 




CLRB 


iRO) 


1 (SET A TERMINATOR 


056364 






TYPE 




J J TYPE THE INPUT UP TO 


056364 


104401 




TYPEIT 












.OSABL 


CRF 




056366 


000000 


6*: 


.WORD 


0 


; (POINTER GOES HERE 


056370 






TYPE 


MSG062 


1 INPUT MUSST BE A 


056370 


104401 


070046 


TYPEIT 


.MSG062 










.DSABL 


CRF 




056374 






TYPE 


MSG06S 


i DECIMAL 


056374 


104401 


070107 


TYPEIT 


.MSG065 










.DSABL 


CRF 




056400 






TYPE 


MSG064 


; NUMBER 


056400 


104401 


070077 


TYPEIT 


.MSG064 










.DSABL 


CRF 




056404 


000714 




BR 


1* 


ssTRY AGAIN 



SEO 0377 



MOV (SP)^.R2 
MOV (SP)».R1 
MOV (SP)..RO 



fRDM STACK 
BAD CHAR. 



CvnjAeo Nsvil J nEnoRT oiag. 
ROUTINE SAVE ANO RESTORE RO-RS 



14195 
14196 
14197 
14196 
14199 
14200 
14201 
14202 
1420S 
14204 
1420S 
1420ft 
14207 
1420e 
14209 
14210 
14211 
14212 
14213 
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.SeiTL ROUTINE SAVE ANO RESTORE RO-RS 



SCO 0376 



14214 
14215 
14216 
14217 
14216 
14219 
14220 
14221 
14222 
14223 
14224 
14225 
14226 
14227 
14228 



14229 



056406 
056406 
056406 
056410 
056412 
056414 
056416 
056420 
056422 
056426 
056432 
056436 
056442 



056444 
056444 

056450 
056454 
056460 
056464 
056464 
056466 
056470 
056472 
056474 
056476 
056500 



C 10046 
010146 
010246 
010346 
010446 
010546 
016646 
016646 
016646 
016646 
000002 



012666 
012666 
012666 
012666 

012605 
012604 
012603 
012602 
012601 
012600 
000002 



000022 
000022 
000022 
000022 



000022 
000022 
000022 
000022 



•SAVE 

•CALL: 

• 

•UPON 
• 

•TOP-- 

• *2.. 

• •4-. 

• .6- 

• .6- 
••10-- 

• •12- 
•*14.- 



RO-RS 
SAVREG 

RETURN FRun ISAVREG THE STACK WILL LOOK LIKE: 

-(.16) 

-(♦18) 

-R5 

-R4 

-R3 

-R2 

-Rl 

•RO 



ISAVREG: 



PUSH 



RO.Rl.R2.R3.R4.R5 



nov 
nov 
nov 

MOV 
RTI 

{•RESTORE R0-R5 
{•CALL: 

;• RESREG 
IRESREG: 

nov 
nov 
nov 
nov 

POP 



22( SP).-(SP) 
22(SP). -CSP) 
22(SP).-CSP) 
22( SP).-(SP) 



SAVE PS OF HAIN FLOW 
SAVE PC OF nAIN FLOW 
SAVE PS OF CALL 
SAVE PC OF CALL 



nov RO.-(SP) 

nov Ri.-(SP) 
nov R2.-(SP) 
nov RS.-(SP) 

nov R4.-(SP) 
nov R5.-(SP) 



(SP). .22( SP) 
(SP).,22(SP) 
lSP)..?2(SP) 
(SP).,22(SP) 
R5.R4.R3.R2.R1.ro 



RESTORE PC OF CALL 
RESTORE PS OF CALL 
RESTORE PC OF HAIN FLOW 
RESTORE PS OF HAIN FLOW 



RTI 



MOV (SP)*.R5 
MOV (SP)*.R4 
MOV (SP)*.R3 
MOV (SP)..R2 
nov (SP)».Rl 

nov (SP)..R0 



CVHJA80 HSVll J nEnORV OIAG. riACRO Y05.02 
ROUTINE RANOCn NUMBER GENERATOR 



14251 
14232 
14253 
14254 
14235 
1425« 
14257 
14238 
14239 
14240 
14;-41 
14242 



14243 
14244 
14245 
14246 
14247 
14248 
14249 
14250 
14251 
14252 
14255 
14254 
14255 
14256 
14257 



14258 



056502 
056502 
056504 
056506 
056510 
056514 
056520 
056524 
056526 
0565S0 
056532 
056556 
056540 
056544 
056550 
056552 
056556 
056562 
056566 
056566 
056570 
056572 
056574 



010046 
010146 
010246 
013700 
015701 
012702 
006500 
C06101 
077205 
065700 
005501 
065701 
062700 
005501 
062701 
010037 
010157 

012602 
012601 
012600 
000207 



002604 
002602 
000007 



002604 

002602 
001057 

047401 
002604 
002602 
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.S8TTL ROUTINE RANOOn NUMBER GENERATOR 



SEQ 0579 



j»THIS ROUTINE 

,*UITH A RANGE 

:*CALL: 

J* CALL 

i * RETURN 

s* 

t* 

tRANO: PUSH 



MOV 

nov 

MOV 

It: ASL 
ROL 

soe 

ADO 
ADC 
ADO 
ADO 
ADC 
ADD 
MOV 
MOV 
POP 



IS 
OF 



A DOUBLE PRECISION PSEUDO RANDOM NUMBER GENERATOR 
0 TO 2**(*55)-l. 



IRANO 



R0.R1.R2 



SEEDLO.RO 

SEEOHI.RI 

♦7.R2 

RO 

Rl 

R2.lt 

SEEDLO.RO 

Rl 

SEEOHI.RI 
•1057. RO 
Rl 

«47401.R1 

RO.SEEDLO 
Rl.SEEDHI 
R2,R1.R0 



:>CALL THE ROUTINE 

t: RETURN HERE THE RANDOM 

: (NUMBER WILL BE IN 

s I tHINUM. ILONUM 



iSET RO WITH LOU 
{SET Rl UITH HIGH 
;SET SHIFT COUNT 

SHIFT RO LEFT AND 
sjROTATE CARRY INTO Rl AND 

:ADD NUMBER TO MAKE X 129 

s: PROROGATE CARRY 

:ADD NUMBER TO MAKE X 129 

S)ADD LOU CONSTANT 

i : PROROGATE CARRY 

cADD HIGH CONSTANT 

sSAVE RO 

sSAVE Rl 



MOV RO.-(SP) 
MOV Rl. (SP) 
MOV R2.-(SP) 



RETURN 



MOV (SP)».R2 
MOV CSP)».R1 
MOV (SP)*.RO 
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ROUTINE DOUBLE LENGTH BINARY TO OCTAL ASCII CONVERT 



SEQ 0360 



14261 
14262 
14263 
14264 
14265 
14266 
14267 
14268 
14269 
14270 
14271 
14272 
14273 
14274 
14275 
14276 
14277 
14278 
14279 
14280 
14281 
14282 
14283 
14284 
14285 
14286 
14287 
14288 
14289 
14290 
14291 
14292 
14293 
14294 
14295 
14296 
14297 
14298 
14301 











.SBTTL 


ROUTINE DOUBLE 








.•THIS 


ROUTINE 


UILL CONVERT A 








(•UNSIGNED OCTAL ASCIZ NUMBER. 








:*CALL 














MOV 


♦PNTR , - ( SP ) 








!* 


CALL 


*DB20 








1* 


RETURN 




056576 


104415 




*DB20 : 


SAVREG 




056600 


016601 


000002 




MOV 


2CSP),R1 


056604 


012705 


05671S 




MOV 


•t0CTVL»13. .R5 


056610 


012704 


000014 




MOV 


♦12. .R4 


056614 


012703 


177770 




MOV 


♦tC7,R3 


056620 


012100 






MOV 


(R1)».R0 


056622 


012101 






MOV 


(R1)».R1 


056624 


005002 






CLR 


R2 


056626 


110245 




1* : 


MOVB 


R2. -(R5) 


056630 


C10002 






MOV 


R0.R2 


056632 


005304 






DEC 


R4 


056634 


003007 






BGT 


3$ 


056636 


001405 






BEQ 


21 


056640 


005205 






INC 


R5 


056642 


010566 


A AAA A ^ 

000002 




MOV 


R5.2(SP) 


056646 


104416 






RESREG 




056650 


000207 






RETURN 




056652 


006203 




OA. 
2* ; 


A CD 


HS 


056654 


006001 




31: 


ROR 


Rl 


056656 


006000 






ROR 


RO 


056660 


006001 






ROR 


Rl 


056662 


OWf>OVU 






ROR 


RO 


056664 


006001 






ROR 


Rl 


056666 


006000 






ROR 


RO 


056670 


040302 






BIC 


R3.R2 


056672 


062702 


000060 




ADD 


«'0.R2 


056676 


000753 






BR 


1» 


056700 


000016 




♦OCTVL 


: .REPT 


14. 


056704 




I0CT8- 


»0CTVL*4 





32 -BIT UNSIGNED BINARY NUMBER TO AN 



> (POINTER TO LOU WORD OF BINARY NUMBER 
J (CALL THE ROUTINE 

iiTHE ADDRESS OF THE FIRST ASCIZ CHAR. IS ON THE STACK 



1 1 SAVE ALL REGISTERS 

11 PICKUP THE POINTER TO LOU WORD 

1 1 POINTER TO DATA TABLE 

t iDO ELEVEN CHARACTERS 

I {MASK 

ii LOWER WORD 
I i HIGH WORD 
I {TERMINATOR 

:iPUT CHARACTER IN DATA TABLE 

; :6ET THIS DIGIT 

sjCOUNT THIS CHARACTER 

mBR IF NOT THE LAST DIGIT 

::BR IF IT IS THE LAST DIGIT 

;iALL DIGITS DONE -ADJUST POINTER FOR FIRST 

ASCIZ CHAR. £ PUT IT ON THE STACK 
i {RESTORE ALL REGISTERS 
i {RETURN TO USER 

s {POSITION THE MASK FOR THE LAST DIGIT 
({POSITION THE BINARY NUMBER FOR 
{{ THE NEXT OCTAL DIGIT 



{ {MASK OUT ALL JUNK 
{{MAKE THIS CHAR. ASCII 
{{GO PUT IT IN THE DATA TABLE 
{ {RESERVE DATA TABLE 
{POINTER TO 11 DIGIT NUMBER 



cvnjABO nsvii 

TABLES 



■J MEMORY OXAG. 



14S05 
14304 
14305 
14306 
14307 
14308 
14309 
14310 
14311 
14312 
14313 
14314 
14315 
14316 
14317 
1431S 
14319 
14320 
14321 
14322 
14323 
14324 
14325 
14326 
14327 
14328 
14329 
14330 
14331 
14332 
14333 
14334 
14335 
14336 
14337 
14338 
14339 
14340 
14341 
14342 
14343 
14344 
14345 
14346 
14347 
14348 
14349 
14350 
14351 
14352 
14353 
14354 
14355 
14356 



056716 
056716 
056 720 
056722 
056724 
056726 
056730 
056732 
056734 
056736 
056736 



056737 

056740 
056742 
056744 



056746 
056747 



056752 
056753 
056754 
056756 
056757 
056760 
056762 
056763 
056764 
056766 
056770 
056772 
056774 

056776 
057000 
057002 



OOOOOO 
OOOOOO 
OOOOOO 
OOOOOO 
OOOOOO 
OOOOOO 
OOOOOO 
OOOOOO 

000 



000 

COOlOl 
OOOOOO 
OOOOOO 



001 
004 



056750 177776 



000 
000 
OOOOOO 
000 
000 
OOOOOO 
000 
000 
OOOOOO 
OOOOOO 
OOOOOO 
OOOOOO 
OOOOOO 

OOOOOO 
OOOOOO 
OOOOOO 
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.SBTTL TABLES 

.SBTTL APT MAILBOX -ET ABLE 



SEQ 0381 



«MAIL : 

♦MSGTY 

IFATAL 

♦TESTN 

tPASS: 

lOEVCT: 

«UNXT: 

IMSGAD: 

tMSGLG; 

«ETABLE 

«ENV: 

I NOTE: 

I 

UnvM: 

«SUREG: 

»USUR: 

ICPUOP: 

I* 

I* 

t* 

«♦ 

8* 
«• 

*MAMS1 : 

»MTYP1: 

;* 

;* 

J* 

;♦ 

;* 

»MA0R1: 

*MAMS2 
IMTYP2 
«MA0R2 
«MAMS3 
♦MTYP3 
«MADR3 
«MAMS4 
♦MTYP4 
«MA0R4 
♦VECTl 
*VECT2 
tBASE: 
•DEVM: 



.UORO 0 1 (MESSAGE TYPE CODE 

.WORD 0 I (FATAL ERROR NUMBER (ERROR PC) 

.UORO 0 I (TEST PATTERN NUMBER 

.WORD 0 I (PASS COUNT 

.UORO 0 I (DEVICE COUNT 

.UORO 0 { (I/O UNIT NUMBER 

.UORO 0 ({MESSAGE ADDRESS 

.UORO 0 {(MESSAGE LENGTH 

((APT ENVIRONMENT TABLE 
.BYTE 0 ((ENVIRONMENT BYTE (SET TO A 1 FOR APT AUTO MODE 

IF BIT «7 IS SET IN lENVM THE TABLE BELOU (BEGt^CUNG AT IMAMSl AND 
ENDING AT »MADR4) MUST BE FILLED IN TO INOICAiE THE PROPER AMOUNT OF 
EACH TYPE OF MEMORY. 



.BYTE 

.WORD 
.UORO 
.UORO 



101 
0 



.BYTE 
.BYTE 



1 
4 



64K 



.UORO 177776 



.BYTE 
.BYTE 
.UORO 
.BYTE 
.BYTE 
.UWD 
.BYTE 
.BYTE 
.UORO 
.UORD 
.UORD 
.UORO 
.UORD 



0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 



»CDU1; .UORD 0 
ICDU2: .UORD 0 
tODU7: .UORD 0 



(ENVIRONMENT MODE 

(BIT7(200)-USE APT SIZE INFO {BirS(40)-N0 CONSOLE 
( (APT SUITCH REGISTER 
(USED TO LIMIT THE NUMBER OF PASSES 
{(CPU TYPE, OPTIONS 
BITS 15-11-CPU TYPE 

11/04-01 . 11/05-02 .11/20-03 , 11/40-04 . 11/45-05 

ll/70-06.PDQ-07.a-10 
BIT 10-REAL TIME CLOCK 
BIT 9-FLOATING POINT PROCESSOR 
BIT 8-MEMORY MANAGEMENT 
({HIGH ADDRESS. M.S. BYTE (DEFAULT 
{{MEM. TYPE.BLK#1 
MEM. TYPE BYTE -- (HIGH BYTE) 

900 NSEC CORE-OOl 

300 NSEC BIPOLAR-002 

PARITY MOS-003 

ERROR CORRECTING MOS-004 
{ (HIGH ADDRESS. BLK*1 

MEM. LAST A0DR.-3 BYTES. THIS UORO AND LOU OF 'TYPE'' ABOVE 
((HIGH ADDRESS. M.S. BYTE 
{|MEM.TYPE.8LK#2 
{(MEM. LAST ADDRESS. BLK«2 
{(HIGH ADDRESS. M.S. BYTE 
{ (HEM. TYPE. BLK#3 
((MEM. LAST ADDRESS. BLK43 
{{HIGH ADDRESS. M.S. BYTE 
! (HEM. TYPE. BLK#4 
{{MEM. LAST ADDRESS. BLK*4 
((INTERRUPT VECT0R«1.BUS PRI0RITY«1 
{(INTERRUPT VECT0R«2BUS PRI0RITY*2 
{ (BASE ADDRESS OF EQUIPMENT UNDER TEST 
({DEVICE MAP 



(UFO MODE FLAG 1-UFD MODE 



CVMJABO MSVll-J MEMORY OIAG. 
APT MAILBOX -STABLE 

14358 
14559 
14360 
14S61 
14362 
14363 
14364 
14365 
14366 

1436? 057004 177777 

14368 057006 177777 

14369 057010 177777 

14370 057012 177777 

14371 057014 177777 

14372 057016 177777 
14376 057020 

14377 
14378 
14379 

14380 057020 

14381 057020 000000 

14382 057022 056716 

14383 057024 000043 

14384 057026 001274 

14385 057030 000000 

14386 057032 000041 
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THE FOLLOUING LOCATIONS SPECIFY WHICH PATTERNS 
ARE TO BE RUN FOR PARTICULAR MEMORIES 

REFERENCE THE TABLE LISTED BELOW TO RELATE BITS TO PATTERNS. 
BITO SET WILL RUN THE FIRST ENTRY IN THE TABLE. BITO SET 
IN THE SECOND WORD WILL RUN THE 17TH ENTRY IN THE TABLE . . . 



SEQ 0382 



NOTE** NULL TESTS DO NOT TAKE ANY TIME 



.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 



177777 
177777 
177777 
177777 
177777 
177777 



lECC 
lECC 
lECC 
lECC 



CSR TESTS 
CSR TESTS 
PATTERNS 
PATTERNS 
i PARITY PATTERNS 
{PARITY PATTERNS 



i FIELD 



tODWO 
tDDWl 
ID0W2 
t00W3 
I00W4 
I00U5 

iIeTUPAPT parameter block as defined in the APT-POPll DIAGNOSTIC 
{INTERFACE SPEC. 



SERVICE 
177777 
177777 
103777 
177777 
003777 
177774 



VALUE 



TABLE 
TABLE 
TABLE 
TABLE 
TABLE 
TABLE 



MKCSRT 

MKCSRT 

MKPAT 

MKPAT 

MJPAT 

MJPAT 



•APTHD 
IHIBTS 
IMBAOR 
ITSTM: 
IPASTM 
♦UNITM 



.WORD 0 

. WORD IMAIL 

. WORD 35 . 

.WORD 700. 

.WORD 0. 

.WORD IETENO-tMAIL/2 



;;TWO HIGH BITS OF 18 BIT MAILBOX ADOR. 
isADDRESS OF APT MAILBOX (BITS 0-15) 
,8 RUN TIM OF LONGEST TEST 

s;RUN TIME IN SECS. OF 1ST PASS ON 128K (QUICK VERIFY) 
i:EXTRA RUN TIME OF A PASS FOR EACH ADDITIONAL 128K (QV) 
iiLENGTH MAILBOX -ETA6LE(U0R0S) 



CVnjABO 


nsvii-j 


rtEHORY 


DIAG. 


ROUTINE 


TRAP DECODER 




14388 








14369 








14390 








14391 








14392 








14393 








14394 








14395 








14396 


0S7034 


010046 




14397 


OS70S6 


016600 


000002 


14398 


057042 


005740 




14399 


057044 


111000 




14400 


057046 


006300 




14401 


057050 


016000 


057076 


14402 


057054 


000200 




14403 








14404 








14405 








14406 








14407 


057056 


C11646 




14406 


057060 


016666 


000004 


14409 


057066 


000002 




14410 








14411 


057070 








057070 


104401 


06SSS7 


14412 


057074 


000000 
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.SBTTL ROUTINE TRAP DECODER 



SEQ 0383 



t*THIS ROUTINE WILL PICKUP THE LOWER BYTE OF THE "TRAP" INSTRUCTION 

i*AN0 USE IT TO INDEX THROUGH THE TRAP TABLE FOR THE STARTING ADDRESS 

i*0F THE DESIRED ROUTINE. THEN USING THE ADDRESS OBTAINED IT WILL 
i*GO TO THAT ROUTINE. 



ITRAP: MOV 


RO.-(SP) 


11 SAVE RO 


MOV 


2CSP).R0 


iiGET TRAP ADDRESS 


TST 


-CRO) 


tiBACKUP BY 2 


MOVB 


(RO).RO 


jiGET RIGHT BYTE OF TRAP 


ASL 


RO 


t (POSITION FOR INDEXING 


MOV 


ITR AD(RO}.RO 


>s INDEX TO TABLE 


RTS 


RO 


tiGO TO ROUTINE 



000002 



J J THIS IS USE TO HANDLE THE "GETPRI" MACRO 
$TRAP2 



MOV 
MOV 
RTI 



♦NOTRAP : TYPE 

TYPEIT 
.DSABL 

tHALT2: HALT 



(SP).-(SP) 
4(SP).2CSP) 



MSG006 

.MSG006 

CRF 



I (MOVE THE PC DOWN 
siMOVE THE PSW DOWN 
: {RESTORE THE PSW 

s UNDEFINED TRAP INSTRUCTION 



CVMJASO nsVll-J nEMORY OIAG. 
TRAP TABLE 



1441S 
14416 
14417 
14416 
14419 
14420 
14421 

14422 0S7076 

14423 057100 

14424 057102 

14425 057104 

14426 057106 

14427 057110 

14428 057112 



14429 
14490 057114 
14431 057116 
14452 

14433 057120 

14434 057122 

14435 057124 

14436 057126 
14437 

14436 057130 
14439 057132 
14440 

14441 057134 

14442 057156 

14443 057140 
14444 

14445 057142 
14446 

14447 057144 

14446 057146 
14449 

14450 057150 

14451 057152 
14452 

14453 057154 

14454 057156 

14455 057160 

14456 057162 

14457 057164 

14458 057166 

14459 057170 

14460 057172 

14461 057174 

14462 057176 

14463 057200 

14464 057202 

14465 057204 
14466>«57206 

14467 «S7210 

14468 057212 

14469 057214 

14470 057216 

14471 057220 



057056 
047030 
054152 
054126 
057070 
054354 
057070 

054754 
054600 

055334 
C55464 
056050 
056220 

056406 
056444 

034070 
034100 
034110 

0S6202 

034120 
034144 

034162 
034256 

047364 
047412 
047440 
047470 
047552 
047574 
047624 
047644 
047666 
047706 
047730 
047752 
047772 
050010 
050026 
050046 
0S0064 
050102 
044664 
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.SBTTL TRAP TABLE 



SEQ 0384 



i*THIS TABLE CONTAINS THE STARTING ADDRESSES OF THE ROUTINES CALLED 
i*BY THE "TRAP" INSTRUCTION. 



I 

ITRPAO: 



ROUTINE 



.UORD 
ITYPE 
•TYPOC 
♦TYPOS 



tTRAP2 

iCALL-TYPEIT 
iCALL-TYPOC 
iCALL-TYPOS 



TRAP » 1(104401) TTY TYPEOUT ROUTINE 

TRAP » 2(104402) TYPE OCTAL NUMBER (WITH LEADING ZEROS) 
TRAP » 3(104403) TYPE OCTAL NUMBER (NO LEADING ZEROS) 
»NOTRAP|»TYPON iCALL-TYPON TRAP*4( 104404) TYPE OCTAL NUMBER (AS PER LAST CALL) 
tTYPOS iCALL-TYPDS TRAP •5(104405) TYPE DECIMAL NUMBER (UITH SIGN) 
INOTRAPitTYPBN iCALL-TYPBN TRAP *6( 104406) TYPE BINARY (ASCII) NUMBER 



IGTSUR 
ICKSUR 



iCALL-GTSUR 
iCALL-CKSUR 



tRDCHR iCALL-RDCHR 

tRDLIN iCALL-RDLIN 

IROOCT iCALL-RDOCT 

>RDOEC iCALL-ROOEC 

ISAVREG iCALL-SAVREG 
tRESREG iCALL-RESREG 



TRAP ♦7(104407) GET SOFT-SUR SETTING 

TRAP •10(104410) TEST FOR CHANGE IN SOFT-SUR 

TRAP ♦11(104411) TTY TYPEIN CHARACTER ROUTINE 
TRAP^12(104412) TTY TYPEIN STRING ROUTINE 
TRAP^13(104413) READ AN OCTAL NUMBER FROM TTY 
TRAP ♦14(104414) READ A DECIMAL NUMBER FROM TTY 

TRAP^15( 104415) SAVE RO-RS ROUTINE 
TRAP ♦ 16(104406) RESTORE RO-RS ROUTINE 



IKERNEL I CALL -KERNEL TRAP ♦I 7(104417) ENTER KERNEL MODE 
»ENERGIZEiCALL-ENERGIZETRAP«20(104420) TURN ON MEMORY MANAGEMENT 6 TRAPS 
IDEENERGI I CALL -DEENERGITRAP*21( 104421) TURN OFF MEMORY MENAGEMENT C TRAPS 



IKMAP 

tCACHN 
tCACHF 

tLOAOC 
>READC 

IPEROl 
«PER02 
>PER03 
IPER04 
IPER07 
IPERIO 
tPERll 
>PER12 
>PER13 
IPER14 
IPER15 
>PER16 
IPER17 
$PER20 
>PER21 
»PER22 
)PER23 
»PER24 
»PER2S 



iCALL>KMAP 

CALL-CACHON 
CALL-CACMOFF 

CALL-LOADCSR 
CALL-RE ADCSR 



CALL' 
CALL' 
CALL' 
CALL' 
CALL' 
CALL' 
CALL' 
CALL- 
CALL' 
CALL' 
CALL- 
CALL' 
CALL- 
CALL' 
CALL' 
CALL' 
CALL' 
CALL' 
CALL' 



PERROl 
PERR02 
PERR03 
PERR04 
'PERR07 
PERRIO 
PERRll 
PERR12 
'PERR13 
'PERR14 
PERRIS 
PERR16 
PERR17 
PERR20 
PERR21 
'PERR22 
PERR23 
PERR24 
PERR25 



TRAP ♦22( 104422) MAP KERNEL 1 TO 1 

TRAP^23( 104423) TURN CACHE ON 
TRAP^24( 104424) TURN CACHE OFF 

TRAP^25( 104425) LOAD CORRECT CSR 
TRAP*26( 104426) READ CORRECT CSR 

TRAP^27( 104427) PROGRAM DETECTED ERROR 
TRAP^30( 104430) PROGRAM DETECTED ERROR 
TRAP ♦31 (104431) PROGRAM DETECTED ERROR 
TRAP ♦ 32(104432) PROGRAM DETECTED ERROR 
TRAP^33( 104433) PROGRAM DETECTED ERROR 
TRAP ♦ 34(104434) PROGRAM DETECTED ERROR 
TRAP^35( 104435) PROGRAM DETECTED ERROR 
TRAP ♦36(104436) PROGRAM DETECTED ERROR 
TRAP^37( 104437) PROGRAM DETECTED ERROR 
TRAP ♦40(104440) PROGRAM DETECTED ERROR 
TRAP^41( 104441) PROGRAM DETECTED ERROR 
TRAP^42(104442) PROGRAM DETECTED ERROR 
TRAP^43(104443) PROGRAM DETECTED ERROR 
TRAP ♦44(104444) PROGRAM DETECTED ERROR 
TRAP ♦45(104445) PROGRAM DETECTED ERROR 
TRAP ♦46( 104446) PROGRAM DETECTED ERROR 
TRAP ♦47(104447) PROGRAM DETECTED ERROR 
TRAP ♦50( 104450) PROGRAM DETECTED ERROR 
TRAP^51(104451) PROGRAM DETECTED ERROR 



cvnjAeo 


nsvii-j 


MCNOAY DIAG. 


NACRO Y05.02 Monday 07 -( 


)ct-a5 16:57 


TRAP TA8LE 










050272 


IPER26 


CALL-PERR26 




J3 fee* 


050312 


IPER27 


CALL-PERR27 


144 /4 




045112 


IPER30 


CALL-PERR30 


144 f D 




050502 


IPERSl 


CALL-PERR31 


14# f O 


US f cOc 


050600 


tPER32 


CALL-PERR32 


1 AA^^ 




050646 


*PERS3 


CALL-PERR33 


14* f 0 




050726 


tPERS4 


CALL-PERR34 


1** f ▼ 




050760 


(PER3S 


iCALL-PERR35 


144 9U 




051014 


*PER36 


CALL-PERR36 


14401 


U J f 


051044 


♦PER37 


CALL-PERR37 


1 AA.ti^ 


n^73AA 


051050 


IPER40 


CALL-PERR40 


1 AAAX 

1*400 


n^73U 


057070 


INOTRAP 


CALL*PERR41 


1 AAtiA 
144 04 


/\S79K9 


057070 


tNOTRAP 


iCALL-PERR42 




/>C734A 


057070 


INOTRAP 


iCALL-PERR43 


14400 










1440 r 


n479%ik 


034456 


lECCOIS 


iCALL-ECCOIS 


14400 


n^79llO 
\I3 rCOV 


034472 


lECClOIS 


iCALL-ECClDIS 


1440 » 


n^79il9 


034504 


tECCZNIT 


iCALL-ECCZNZT 


1 

14^^V 




034520 


lECClINIT 1 CALL-ECCIIN. 


144Ti 




C34560 


ICBCSR 


iCALL-CBCSR 


1*4T« 


0S7570 

V J 1 C ff V 


034602 


iceicsR 


iCALL-CBlCSR 


44^T^ 


• C f K 


034622 


IUASS8E 


iCALL-UASSBE 






034736 


lUASlSBE 


iCALL-UASlSBE 


144 if 3 


OS737A 
* c ( D 


034766 


lUASOBE 


iCALL-UASOBE 


X4*T1> 


n^7VM 


035102 


lUASlOBE 


iCALL-UASlDBE 


X*4T r 


OS7V)9 


035132 


ICLRCSR 


iCALL-CLRCSR 


1*4 


AS7UA 


035144 


ICLRICSR 


iCALL-CLRlCSR 


144 tFT 


v3 > JVO 


035154 


(CHKDIS 


iCALL-CHKOZS 






035170 


tCHKlOIS 


iCALL-CHKlDZS 


J14;#WX 


A^7Y ■ 9 


034532 


lENASBE 


iCALL-ENASBE 


143WC 


0^7'V1 A 
W J f ^ 


034546 


IENA1S8E 


iCALL-ENAlSBE 


14 




034276 


ITSTRD 


iCALL-TSTREAO 


14 JV4 




035250 


IINVALIO 


iCALL-ZNVALZO 


l^TVJ 




035300 


lERRGEN 


iCALL-ERRGEN 


14506 


057S24 


035550 


ICBREC 


iCALL-CBREG 


14507 


057326 


035566 


ISYNREG 


iCALL-SYNREG 


14508 


057350 


057070 


tNOTRAP 




14509 


057332 


AC7A7A 


INOTRAP 




14510 


057334 


057070 


INOTRAP 




14511 


057336 


057070 


INOTRAP 




14512 


057340 


057070 


INOTRAP 




14513 


057342 


057070 


INOTRAP 





14516 



177776 



ST • 177776 



P»g* 440-1 

SEQ 03«S 

TRAP*S2( 104452) PROGRAM DETECTED ERROR 

TRAP •53(104453) PROGRAM DETECTED ERROR 

TRAP »54( 104454) PROGRAM DETECTED ERROR 

TRAP *5S( 104455) PROGRAM DETECTED ERROR 

TRAP* 56(104456) PROGRAM DETECTED ERROR 

TRAP »57( 104457) PROGRAM DETECTED ERROR 

TRAP » 60(104460) PROGRAM DETECTED ERROR 

TRAP*61( 104461) PROGRAM DETECTED ERROR 

TRAP ♦62(104462) PROGRAM DETECTED ERROR 

TRAP *63( 104463) PROGRAM DETECTED ERROR iiILCiREV 8 

TRAP*64( 104464) PROGRAM DETECTED ERROR tiZLCiREV B 

TRAP *65( 104465) PROGRAM DETECTED ERROR 

TRAP *66( 104466) PROGRAM DETECTED ERROR 

TRAP *6 7(104467) PROGRAM DETECTED ERROR 

TRAP* 70(104470) DZSABLE ECC ON ALL CSR'S 
TRAP»71( 104471) DZSABLE ECC ON 1 SELECTED CSR 
TRAP ♦72(104472) INZTZALZZE ALL MKll CSR'S 
:T trap ♦73(104473) ZNZTZALZZE 1 SELECTED MKll CSR 

TRAP^74( 104474) URZTE GENERATED CMECKBZTS IN ALL CSR'S 

TRAP^75(104475) URZTE GENERATED CbECKBZTS IN 1 SELECTED CSR 

TRAP^76(104476) WAS THERE A SPE ON ANY CSR7 

TRAP ♦ 77(104477) WAS THERE A SBE ON 1 SELECTED CSR? 

TRAP^100( 104500 )UAS THERE A DBE ON ANY CSR? 

TRAP ♦lOK 104501 )UAS THERE A DBE ON 1 SELECTED CSR? 

TRAP ♦102( 104502 )CLEAR ALL CSR'S 

TRAP ♦103( 104503 )CLEAR 1 SELECTED CSR 

TRAP ♦104( 104504 )0ZSABLE ECC £ URZTE CKBITS FROM ALL CSR'S 
TRAP ♦105( 104505 )DZSABLE ECC £ URZTE CKBZTS FROM 1 CSR 
TRAP ♦106( 104506 )ENABLE TRAPS ON SBE' S FROM ALL CSR'S 
TRAP ♦107( 104507 )ENABLE TRAPS ON SBE'S FROM 1 SELECTED CSR 
TRAP •110( 104510 }TEST LOC (Rl) £ TST FOR SBE (UITMOUT FETCHES 
TRAP ♦IIK 104511 )ZNVALZDATE BACKGROUND PATTERN ON BANK 
TRAP*112( 104512 )TkST ERROR ADDRESS 
TRAP*113(104513)ENABLE CHECK BZT REGZSTER 
TRAP *114( 104514 )ENABLE SYNDROME BZT REGZSTER 



: STATUS REGZSTER 



CVMJAeO riSrfll-J MEMORY DIAC. 
TABLE ERROR POINTER 

14519 
14520 
14521 
14522 
14S2S 
14524 
14525 
14526 
14527 
14528 
14529 
14530 
14531 
14532 

14533 057344 

14534 057344 062032 

14535 057346 064242 

14536 057350 060370 

14537 057352 060751 
14538 

14539 057354 061017 

14540 057356 063551 

14541 057360 060214 

14542 057362 060627 
14543 

14544 057364 061055 

14545 057366 063631 

14546 057370 060232 

14547 057372 060744 
14546 

14549 057374 061107 

14550 057376 063631 

14551 057400 060242 

14552 057402 060744 
14553 

14554 057404 061155 

14555 057406 063665 

14556 057410 060252 

14557 057412 060627 
14558 

14559 057414 061232 

14560 057416 063665 

14561 057420 060252 

14562 057422 060627 
14563 

14564 057424 061257 

14565 057426 063665 

14566 057430 060252 

14567 057432 060627 
14568 

14569 057434 063243 

14570 057436 064764 

14571 057440 060546 

14572 057442 060627 



MACRO r05.02 Monday 07 -Oct -85 16:57 Pag* 444 



.SBTTL TABLE ERROR POINTER 



SEQ 0366 



*THIS TABLE CONTAINS THE INFORMATION FOR EACH ERROR TMA1 CAN OCCUR. 
*THE INFORMATION IS OBTAINED BY USING THE INDEX NUMBt-R FOCMD IN 
•LOCATION IITEMB. THIS NUMBER INDICATES WHICH ITEM IN THE TABLE IS PERTINENT 



*N0TE1: 
*N0TE2: 



EM 
OH 
OT 
OF 



lERRTB: i ERROR 
EM24 



IF IITEMB IS 0 THE ONLY PERTINENT DATA IS (ERRPC). 
EACH ITEM IN THE TABLE CONTAINS 4 POINTERS EXPLAINED AS FOLLOWS: 

1 1 POINTS TO THE ERROR MESSAGE 
1 (POINTS TO THE DATA HEADER 
jiPOINTS TO THE DATA 
iiPOINTS TO THE DATA FORMAT 



DH13 
0T13 
OFll 

t ERROR 2 
EM2 
OHl 
OTl 

0F2 

I ERROR 3 

EM3 

OHS 

0T3 

0F9 

t ERROR 4 
EM4 
0H3 
0T4 

0F9 

1 ERROR 5 
EMS 
0H5 
0T5 

0F2 

(ERROR 6 

EM6 

OHS 

0T5 

DF2 

J ERROR 7 

EM7 

DHS 

DT5 

0F2 

I ERROR 10 

EM53 

0H2S 

0T25 

0F2 



cvnjAeo nsvii-j nenoRY oiag. 

TABLE ERROR POINTER 



MACRO Y05.02 Honday 07 -Oct -65 16:57 Pa9« 446 



SEQ 0507 









1 ERROR 




U3 » 444 


Ml %\ 7 
W 1 w A f 


£111 


14D f f 


U3 » 440 


MA01 1 

W4VA A 


0H7 


143 fO 


V3 f 43V 


M0%04 

VwV/W>^ 


DT7 


143 ' tF 


1/3 •43c 


0&M91 
WWww 


OFS 


1430U 






(ERROR 


14301 




Ml 11 7 

WAWA ' 


Eflll 


1430C 




0A401 1 


0H7 


1430d 


U3 ' 4QV 


M0104 

WWW^^* 


DT7 


1 A^JIA 
14 jO^ 






0F4 


14303 






t ERROR 


1 


0974&4 


061341 


Eni2 


1 A%A7 

* 




064121 


OHIO 




097470 


060S34 


OTIO 




057472 


060627 


or2 








1 ERROR 




057474 


061317 


EHll 




057476 


064011 


DH7 


1499B 


057500 


060304 


DT7 


1499^ 


057502 


060701 


DF5 








(ERROR 




0575O4 


061317 


EHll 




057506 

WW • WWW 


064011 


0H7 




057510 

WW f WAW 


060304 


0T7 




057512 

WW • WAS 


060714 


0^6 








(ERROR 


14601 


057514 


061365 


Eni3 


14602 


057516 


064242 


DH13 


14M3 


057520 

WW ' WSW 


060370 


0T13 


14604 


057522 


060751 


OFll 


14605 






(ERROR 


14606 


0S7S24 


061417 


Eni4 


14M7 


057526 


064242 


DH13 


x^ v^nf 


0575S0 

WW • WvW 


060370 


0T13 


14604 


057512 

WW • W«9S 


060751 


OFll 


14A10 






(ERROR 


14611 


0S7SS4 


061463 


EMIS 


14612 


057536 


064242 


0H13 


14611 


057540 


060370 


0T13 


14614 


057542 


060751 


OFll 


14615 






(ERROR 


14616 

XW 


057544 


063272 


EMSS 


14^17 


057546 


065022 


0H26 


14VXO 


057550 


060560 

WWW^^PW 


0T26 


14A19 


057552 

WW ■ wwc 


060627 


0f2 


14AM 






(ERROR 


146P1 

A^VC A 


057554 

WW ' w^^v 


061531 


Eni7 


14622 


057556 


064011 


0H7 


14623 


057560 


060304 


0T7 


14624 


057562 


060701 


0F5 


14625 






(ERROR 


14626 


057564 


063112 


En50 


14627 


057566 


064636 


0H23 


14628 


057570 


060504 


0T23 


14629 


057572 


060762 


OF 13 



cvnjASO nsvii-j nEtvmy oiag. 

TABLE ERROR POINTER 



I1ACR0 T05.02 nonday 07 Oct 85 16:57 Pag* 448 



SEQ 0388 



14«52 




(ERROR 


14633 057574 


061571 


EM19 


14634 057576 


064242 


DH13 


14635 057600 


060370 


0T13 


14636 057602 


0v^C»751 


OFll 


14637 




(ERROR 


14636 057604 


061643 


En20 


14639 057606 


064242 


DH13 


14640 057610 


060370 


OTIS 


J 4641 057612 


060751 


Dfll 


14642 




(ERROR 


14643 057614 


000000 


0 


14644 057616 


064235 


0H12 


14645 057620 


060364 


0T12 


14646 057622 


060627 


DF2 


14647 




(ERROR 


14648 057624 


061722 


En21 


14649 057626 


064217 


OHll 


14650 0S76S0 


060SS6 


OTll 


14651 057632 


C60627 


Dr2 


^4652 




(ERROR 


14653 057634 


061756 


En22 
DH13 


14/54 057636 


064242 


.4655 057640 


060370 


0T13 


14656 057642 


060751 


DFll 


14657 




(ERROR 


14658 057644 


000000 


0 


14659 057646 


064337 


DH14 


14660 057650 


060412 


DT14 


14661 057652 


060627 


0F2 


14662 




1 ERROR 


14663 0576S4 


062003 


EM23 


14664 0S76S6 


063665 


DH5 


14665 057660 


060252 


0T5 


14666 057662 


060627 


0^2 


14667 




(ERROR 


14668 057664 


062111 


En25 


14669 057666 


064416 


OHIS 


14670 057670 


060430 


0T16 


14671 0S7672 


060727 


0F7 


14672 




(ERROR 


14673 057674 


062136 


En26 


14674 057676 


064535 


0H16 


14675 057700 


060460 


0T17 


14676 057702 


060653 


0F3 



(NO MESSAGE 



(NO MESSAGE 



CVnjA80 nsvil J rCtlORr DXAG. MACRO V0S.02 Monday 07-Oet-aS 16:57 
TABLE ERftOf) POINTER 



146 7» 




lERROR 


35 


L4M0 057704 


063216 


CH52 




14M1 057706 


064764 


0K2S 




14662 057710 


060546 


0T25 




1466S 057712 


060627 


0^2 




14664 




lERROR 
EM27 


36 


14665 057714 


062207 




14666 057716 


064535 


0H16 




14667 057720 


060460 


DT17 




14666 057722 


060742 


0^8 




1466* 




lERRQR 
En35 


37 


14690 057724 


062704 




14691 057726 


064011 


0H7 




14692 0S77S0 


AA AVAA 

060304 


0T7 




14693 057752 


A^ A^ W 

060653 


0F3 




14694 




lERROR 


40 


14695 057754 


062277 


En29 




14696 057756 


AA A Aa a 

064011 


DM7 




14697 057740 


AA AVAA 

060304 


DT7 




14696 057742 




DF3 




14699 




lERROR 


41 


14700 057744 


O 2361 


EM30 




1' 701 057746 


Oi 1011 


0M7 




14702 057750 


Qi ^904 


0T7 




14703 057752 


AJLA'9A6 

0v0701 


0r3 




14704 




lEivraR 




14703 057754 


AAV A 6 V 

0§9419 


cn6u 




14706 057756 




otso 




14707 0577M 


AJt AKA^ 

060504 


0T23 




14706 057762 


06O762 


net V 
Oris 




14709 




ICNNUR 




14710 057764 


A^ ^ a 

062471 






14711 057766 


064011 


OHf 




14712 057770 


060304 


DT7 




14713 057772 


060693 


Or 9 




14714 








14715 057774 


062576 




14716 057776 


064011 


III17 




* A ^ • ^ A^ AAAA 

14717 060000 


AA AVAA 

O»0jO4 


01 » 




14719 060002 


0M659 






14719 




ICMUH 




14720 06OiiO4 


0^9140 














14722 060010 


060526 


0T24 




1472B 060012 


060772 


OF 14 




14724 




lERMR 


46 


14725 060014 


062771 


En36 




!«72« 060016 


063744 


0H6 




14727 060020 


060270 


DT6 




t4726 060022 


060627 


or2 





450 

SCQ 0369 



CVMJABO MSVll-J MEMORY OIAC. 
TABLE ERROR POINTER 



14731 
14732 
14733 
14754 
14735 
14756 
14737 
14756 
14759 
14740 
14741 
14742 
14745 
14744 
14745 
14746 
14747 
14746 
14749 
14750 
14751 
14752 
14755 
14754 
14755 
14756 
14757 
14756 
14759 
14760 
14761 
14762 
14765 
14764 
14765 
14766 
14767 
14766 
14769 
14770 
14771 
14772 
14775 
14774 
14775 
14776 
14777 
14776 
14779 
14760 
14761 
14762 
14765 
14764 
14765 
14766 
14767 



060024 
060026 
060050 
060032 

060054 
060056 
060040 
060042 

060044 
060046 
060050 
060052 

060054 
060056 
060060 
060062 

060064 
060066 
060070 
060072 

060074 
060076 
060100 
060102 

060104 
060106 
060110 
060112 

060114 
060116 
060120 
060122 

060124 
060126 
060150 
060132 

060134 
060136 
060140 
060142 

060144 
060146 
060150 
060152 



065040 
065606 
060466 
060627 

065515 
065040 
060566 
060626 

065455 
064715 
060526 
060772 

062277 
064242 
060570 
C60751 

062111 
065114 
060606 
061010 

065545 
065114 
060606 
061010 

061643 
064715 
060526 
060772 

061645 
065114 
060606 
061010 

061571 
064715 
060526 
060772 

061365 
064557 
060S04 
060762 

062561 
064557 
060504 
060762 



060154 061645 



Monday 07 Oct 85 16:57 P*o« 452 



SEQ 0390 



lEfkROR 47 

EM40 

0H2 

0T20 

0F2 

(ERROR SO 

EM56 

DH27 

DT27 

OFl 

1 ERROR 51 

EM61 

0H24 

0T24 

OF 14 

i ERROR 52 

EM29 

0H15 

DT15 

DFll 

(ERROR 55 

EM25 

0H50 

0T50 

OF 16 

(ERROR 54 

EM57 

DH50 

DT50 

OF 16 

(ERROR 55 

EM20 

0H24 

0T24 

OF 14 

(ERROR 56 

EM20 

0H50 

0T50 

OF 16 

(ERROR 57 

EM19 

DH24 

0T24 

DF14 

(ERROR 60 

EM13 

0H20 

0T25 

0F15 

(ERROR 61 

EM50 

0H2O 

0T25 

0F15 

(ERROR 62 
EM20 



CvnjABO nsvil J nEnORY OIAG. nACRO Y05.02 nonday 07 0ct-8S 16:57 Pag* 452-1 

TA8LE ERROR POINTER SEQ 0S91 



14766 


060156 


064715 


0H24 


14769 


060160 


060526 


0T24 


14790 


060162 


060772 


OF 14 


14791 






(ERROR 


14792 


060164 


061756 


En22 


14793 


060166 


064715 


DH24 


14794 


060170 


060526 


0T24 


14795 


060172 


060772 


OF 14 


14796 






(ERROR 


14797 


060174 


063476 


EM62 


1*796 


060176 


063665 


DH5 


14799 


060200 


060252 


DT5 


14600 


060202 


060627 


DF2 


14601 






(ERROR 


14602 


060204 


061756 


En22 


14603 


060206 


064557 


DH20 


14604 


060210 


060504 


0T23 


14605 


060212 


060762 


OF 13 



CvnjABO nsvil-J MEnOftY OIAG. macro Y05.02 Monday 07 
ERROR DATA TAG. COT) 



14807 












.SBTTL 


14808 


060214 


002020 


002034 


002044 


DTI: 


.WORD 


060222 


002052 


000000 








14809 


060226 


002020 


000000 




DT2: 


.WORD 


14810 


060232 


002020 


002036 


002072 


DT3: 


.WORD 




060240 


000000 










14811 


060242 


002020 


002034 


002070 


DT4: 


.WORD 




060250 


000000 










14812 


060252 


002020 


177572 


177574 


DT5: 


.WORD 




060260 


177576 


172516 


177766 








060266 


000000 










14813 


060270 


002020 


002422 


002400 


DT6: 


.WORD 




060276 


002424 


002402 


000000 






14814 


060304 


002020 


002176 


002034 


DT7: 


.WORD 




060312 


002176 


002044 


002052 








060320 


002060 










1481S 


060322 


002176 


002176 


002176 




.WORD 




060330 


002176 


000000 








14816 


060334 


002200 


002202 


002204 


DTIO: 


.WORD 




060342 


C02206 


002210 


002212 








060350 


002214 


002216 


000000 






14817 


060356 


002020 


002150 


000000 


OTll: 


.WORD 


14818 


060364 


002150 


000000 




DT12: 


.WORD 


14819 


060370 


002020 


002176 


002034 


OTIS: 


.WORD 




060376 


002176 


002246 


002250 








060404 


002314 


002150 


000000 






14820 


060412 


177746 


177572 


177574 


DT14: 


.WORD 




060420 


177576 


172516 


177766 








060426 


000000 










14821 


060430 


002020 


002176 


002176 


DT16: 


.WORD 




060436 


002044 


002046 


002050 






14822 


060444 


002052 


002054 


002056 




.WORD 




060452 


002176 


002176 


000000 






14825 


060460 


002020 


002176 


000000 


0T17: 


.WORD 


14824 


060466 


002020 


002044 


002052 


DT20: 


.WORD 




060474 


000000 










14825 


060476 


002020 


002176 


000000 


0T22: 


.WORD 


14826 


060504 


002020 


002176 


002044 


0T23: 


.WORD 


060512 


002052 


002176 


002176 








060520 


002176 


002176 


000000 






14827 


060526 


002020 


002176 


002150 


DT24: 


.WORD 




060534 


002176 


002176 


002176 








060S42 


002176 


000000 








14828 


060546 


002020 


002044 


002150 


DT25: 


.WORD 




060554 


002152 


000000 








14829 


060560 


002020 


002052 


000000 


DT26: 


.WORD 


14830 


060566 


002020 


002176 


002034 


0T27: 


.WORD 




060574 


002176 


002176 


'^02176 








060602 


002176 


000000 








14831 


060606 


002020 


002176 


002176 


0T30: 


.WORD 




060614 


002044 


002052 


002150 








060622 


002176 


000000 









Oct 85 16:57 Page 453 

SEQ 0392 

ERROR DATA TAGS (DT) 
ERRPC . ADDRESS . GCOD . BAD . 0 

ERRPC.O 

ERRPC . PAODRESS . PARCNT . 0 

LRRPC . ADDRESS . NEMCNT . 0 

ERRPC . MTIRO . MHR 1 , nriR2 . riMR3 . CPUERR . 0 

ERRPC . APTPAR . LSIZE . APTECC . MSIZE , 0 

ERRPC . DUMMY . ADDRESS , DUMMY . GOOD . BAD . B ADXOR 

DUMMY . DUMMY , DUMMY . DUMMY . 0 

DETRO . DETR 1 . DETR2 . DETR3 . 0ETR4 . DETR5 . DETSP . OETPSW . 0 

ERRPC. CSR.O 
CSR.O 

ERRPC . DUMMY . ADDRESS . DUMMY . TSTDAT . TSTDAT »2 . CHECK . CSR . 0 

CONTRL . MMRO . MMRl . MMR2 , MMR3 . CPUERR . 0 

ERRPC . DUMMY . DUMMY . GOOD . G00D2 . GOODS 

BAD . B AD2 . 8 A03 . DUMMY . DUMMY . 0 

ERRPC. DUMMY. 0 
ERRPC. GOOD, BAD. 0 

ERRPC. DUMMY. 0 

ERRPC . DUMMY . GOOD . BAD . DUMMY . DUMMY . DUMMY . DUMMY . 0 

ERRPC . DUMMY , CSR . DUMMY . DUMMY . DUMMY . DUMMY . 0 

ERRPC . GOOD . CSR . CSRNO , 0 
ERRPC BAD 0 

ERRPC '. DUMMY . ADDRESS . DUMMY , DUMMY . DUMMY . DUMMY . 0 



ERRPC . DUMMY . DUMMY . GOOD . BAD . CSR . DUMMY . 0 



CvnjABO nsvii-J MEnoftr OIAC. 

ERROR DATA FORMATS (Of) 



MACRO YDS. 02 Monday 07 Oct 65 16:57 Pag* 455 



SEQ 0393 



14834 












.SBTTL 


14835 


060626 


000 






Dfl: 


.BYTE 


14836 


060627 


000 


000 


000 


Df2: 


.BYTE 




060632 


000 


000 


000 








060635 


000 


000 


000 








060640 


000 


000 


000 








060643 


000 


000 


000 








060646 


000 


000 


000 








060651 


000 


000 








14837 


060653 


000 


005 


000 


0F3: 


.BYTE 




06065C 


010 


000 


000 








060661 


000 


003 


006 








060664 


002 


004 








14838 


060666 


000 


005 


000 


0F4: 


.BYTE 


060671 


010 


000 


010 








060674 


010 


003 


006 








060677 


002 


004 








14839 


060701 


000 


005 


000 


DF5: 


.BYTE 




060704 


010 


Oil 


oil 








060707 


oil 


003 


006 








060712 


002 


004 








14840 


060714 


000 


005 


000 


0F6: 


.BYTE 




060717 


010 


Oil 


010 








060722 


010 


003 


006 








060725 


002 


004 








14641 


060727 


000 


005 


010 


0F7: 


.BYTE 


060732 


000 


000 


oil 








060735 


000 


000 


oil 








060740 


002 


004 








14642 


060742 


000 


005 




0F6: 


• BYTE 


14643 


060744 


000 


001 


001 


0F9: 


.BYTE 




060747 


001 


001 








14644 


060751 


000 


005 


000 


OFll: 


.BYTE 




060754 


010 


000 


000 








060757 


000 


000 


000 






14645 


060762 


000 


005 


000 


OF 13: 


.BYTE 


060765 


000 


003 


006 








060770 


002 


004 








14646 


060772 


000 


005 


000 


OF 14: 


.BYTE 




060775 


003 


006 


002 








061000 


004 










14647 


061001 


000 


005 


000 


OF 15: 


.BYTE 




061004 


010 


003 


006 








061007 


004 








.BYTE 


14646 


061010 


000 


005 


010 


DF16: 


061013 


000 


000 


003 








061016 


004 











BYTE 0.5.0.0.3.6.2.4 



CVMJABO MSVll J MEMORY OIAG. 
ERROR MESSAGES (EM) 



14851 
14857 



14858 



14859 



14860 



14861 



14862 



061017 


103 


101 


116 


061022 


047 


124 


040 


061025 


123 


105 


124 


061030 


040 


062 


062 


061033 


040 


102 


111 


061036 


124 


040 


115 


061041 


117 


104 


105 


061044 


040 


111 


116 


061047 


040 


115 


115 


061052 


122 


063 


000 


061055 


120 


101 


122 


061060 


111 


124 


131 


061063 


040 


105 


122 


061066 


122 


117 


122 


061071 


050 


123 


051 


061074 


040 


111 


116 


061077 


040 


102 


101 


061102 


116 


113 


040 


061105 


060 


000 




061107 


116 


117 


116 


061112 


055 


105 


130 


061115 


111 


123 


124 


061120 


101 


116 


124 


061123 


040 


115 


105 


061126 


115 


117 


122 


061131 


131 


040 


050 


061134 


110 


117 


114 


061137 


105 


123 


051 


061142 


040 


111 


116 


061145 


040 


102 


101 


061150 


116 


113 


040 


061153 


060 


000 




061155 


111 


114 


114 


061160 


105 


107 


101 


061163 


114 


040 


117 


061166 


122 


040 


122 


061171 


105 


123 


105 


061174 


122 


126 


105 


061177 


104 


040 


111 


061202 


116 


123 


124 


061205 


122 


125 


103 


061210 


124 


111 


117 


061213 


116 


040 


050 


061216 


124 


122 


101 


061221 


120 


040 


124 


061224 


117 


040 


061 


061227 


060 


051 


000 


061232 


125 


116 


105 


061235 


130 


120 


105 


061240 


103 


124 


105 


061243 


104 


040 


124 


061246 


122 


101 


120 


061251 


040 


124 


117 


061254 


040 


064 


000 


061257 


115 


105 


115 


061262 


117 


122 


131 



MACRO Y05.02 Monday 07 -Oct -85 16:57 Pag« 457 



.SBTTL ERROR MESSAGES (EM) 

.ASCIZ /CAN'T SET 22 BIT MODE IN MMR3/ 



.ASCIZ /PARITY ERROR(S) IN BANK 0/ 



.ASCIZ /NON-EXISTANT MEMORY (HOLES) IN BANK 0/ 



.ASCIZ /ILLEGAL OR RESERVED INSTRUCTION (TRAP TO 10)/ 



.ASCIZ /UNEXPECTED TRAP TO 4/ 



.ASCIZ /MEMORY MANAGEMENT (TRAP TO 250)/ 



CVMJA80 MSVll-J MEMORY OIAG. MACRO Y05.02 Monday 07-0ct-85 16:57 Psq* 457-1 



ERROR MESSAGES 


CEM) 






061265 


040 


115 


101 


061270 


116 


101 


107 


061273 


105 


115 


105 


061276 


116 


124 


040 


061S01 


050 


124 


122 


061504 


101 


120 


040 


061307 


124 


117 


040 


061312 


062 


065 


060 


061315 


051 


000 




14663 061317 


115 


105 


115 


061322 


117 


122 


131 


061325 


040 


104 


101 


0613S0 


124 


101 


040 


061333 


105 


122 


122 


061336 


117 


122 


000 


14064 061341 


104 


105 


124 


061S44 


101 


111 


114 


061S47 


105 


104 


040 


061352 


105 


122 


122 


061355 


117 


122 


040 


061360 


104 


125 


115 


061363 


120 


000 




14665 061365 


115 


111 


123 


061370 


123 


111 


116 


061373 


107 


040 


105 


061376 


130 


120 


105 


061401 


103 


124 


105 


061404 


104 


040 


123 


061407 


102 


105 


040 


061412 


106 


114 


101 


061415 


107 


000 




14666 061417 


127 


122 


111 


061422 


124 


105 


040 


061425 


102 


131 


124 


061430 


105 


040 


106 


061433 


101 


111 


114 


061436 


105 


104 


040 


061441 


124 


117 


040 


061444 


103 


114 


105 


061447 


101 


122 


040 


061452 


123 


102 


105 


061455 


040 


106 


114 


061460 


101 


107 


000 


14667 061463 


106 


101 


111 


061466 


114 


105 


104 


061471 


040 


124 


117 


061474 


040 


107 


105 


061477 


124 


040 


111 


061502 


116 


124 


105 


061505 


122 


122 


125 


061510 


120 


124 


040 


061513 


127 


111 


124 


061516 


110 


040 


104 


061521 


102 


105 


040 


061524 


106 


114 


101 


061527 


107 


000 




14668 061531 


115 


105 


115 



.ASCIZ /MEMORY DATA ERROR/ 



.ASCIZ /DETAILED ERROR DUMP/ 



.ASCIZ /MISSING EXPECTED SBE FLAG/ 



.ASCIZ /URITE BYTE FAILED TO CLEAR SBE FLAG/ 



.ASCIZ /FAILED TO GET INTERRUPT UITH DBE FLAG/ 



.ASCIZ /MEMORY DATA ERROR IN CHECK BITS/ 



EnNUK McbSAbca 


f CM ^ 








061334 


117 


1 33 
Xcc 


1 31 

X JX 




061597 


A^A 
V4U 


1 f\A 
1V4 


1 Ol 

xvx 




06134 if 


1 OA 
Xc4 


1 01 
XVX 


MO 
v^v 




06l3#3 


1 AV 

103 


1 33 
Xcc 


1 33 
Xcc 




06153O 


117 

11 1 


1 33 
Xcc 


OAO 
V^V 




061330 


111 

IXX 


IXO 


OAO 
V^V 




061336 


1 AX 
1V3 


1 1 O 
XXV 


1 OS 
XV^ 




061361 


1 t\X 
IVO 


1 1 Y 
XX3 


MO 
V^V 




061364 


1 A3 
IVe 


111 
111 


1 3A 
le4 




06136 1 


1 3'V 


AAA 






14069 0613 rl 


1 9X 
ls3 


1 03 
XVc 


1 0S 
XV3 


PM1 Q • 


0613 r4 


V33 


1 M 
XV^ 


1 09 
XVC 




0619 r r 


1 f\% 
XV3 


OAO 
V^V 


1 03 
XV J 




U616UC 


ini 
xvx 


1 3S 
XC3 


1 93 

XCd 




061DV3 


1 ns 

XV3 


1 OA 
XV^ 


OAO 
v^v 




06161U 


1 3n 

XcV 


ml 
xvx 


1 99 
XCC 




AJL1 ill Y 


111 
XXX 


1 3A 
XC^ 


1 31 

X JX 






Mn 


1 9A 
XC^ 


129 
xcc 






1 01 
xvx 


190 
xcv 


MO 

V^ V 






137 


1 10 

XXV 


105 
xv^ 




nAI 4k37 


xxo 


OAO 
v^v 


111 

XXX 






1 m 
xxo 


1 10 

XXV 


111 

XXX 




O6XO03 


1 n3 

XVs 


111 
XXX 


19A 
xc^ 






XV3 


10A 


OOO 




a40 rU 061040 


1 3V 

XsO 


1 09 
XVC 




tncv • 


UOXD4D 


OSS 


10A 

xv^ 






U0X03X 


1 OS 
XV3 


OAO 


104 




^AIXw3^ 


111 
XXX 


104 
xv^ 


040 




U0103 r 


1 m 
xxo 


117 

XX ' 


124 

xc^ 






OAO 


lOS 

XV J 


101 




U0X003 


19S 
XC3 


12S 

XCv 


105 






OAO 


120 
xcv 


101 




AiLI Jt7'V 


1 33 
Xcc 


111 

XXX 






AJL1 

06X0 f O 


1 '^1 
xox 


OAO 
v^v 


124 






1 33 
Xcc 


lOl 
xvx 


120 




AHI 7AA 
UOX rU4 


OAO 
V^W 


197 

XC ' 


110 




AJll 7n7 
UPX ff U r 


XV J 


116 

XXw 


040 

V^V 




AJll 71 3 
VlOX I Xe 


1 0S 
XV3 


XXw 


101 
xvx 




Aill 71 ^ 
W>X f X3 


109 


1 14 


105 




OAI 79n 
VvX ' CV 


1 0A 

xv^ 


OOO 






1AII71 OA 1733 
X40 r X X ' cc 


13S 

XC J 


102 

XVC 


105 

A Vi^ 


Et121: 


n*i 79<( 
UOX 'CS 


OSS 

V33 


lOA 
xv^ 


102 

XVK 




AAI 7^0 
VOX ff 


10S 
XV3 


OAO 

V^ V 


117 

XX ' 




Ml 7^'^ 
VvX r J J 


XXw 


040 


115 




Ml 7VJI 
VOX ' do 


1 01 
xvx 


123 
xc<? 


124 

xc^ 




ntk \ 7A1 

vox r^X 


10S 

XV3 


122 
xcc 


040 




Aill 7AA 
VOX f 


1 3A 
Xc^ 


10S 

XV3 


123 

XCw 




Aill 7A7 
VOX '4 f 


1 3A 
Xc^ 


OAO 
v^v 


127 

XC ' 




Ml 7^3 
VOX r 3c 


117 
XX > 


122 
xcc 


104 




AA1 7^V 

VOX ff 33 


ooo 
vw 






E(122' 


1Ail73 nA17^Jl 
140rc V0X'30 


IIS 

XX3 


111 

XXX 


12S 

Xfi w 


061761 


123 


111 


116 




061764 


107 


040 


105 




061767 


130 


120 


105 




061772 


103 


124 


105 




061775 


104 


040 


104 




062000 


102 


105 


000 





riACRO Y05.02 Monday 07-0ct-6S 16:57 Pm^m 457-2 



SEQ 0396 



.ASCZZ /SBE-OBE CAUSED PARITY TRAP WHEN INHIBITED/ 



.ASCIZ /S6E-D6E DID NOT CAUSE PARITY TRAP WHEN ENABLED/ 



.ASCIZ /SBE-DBE ON MASTER TEST WORD/ 



.ASCIZ /MISSING EXPECTED DBE/ 



CVMJA80 MSVll-J 


MEMORY 


OIAG. 


MACRO 


ERROR MESSAGES 


(EM) 






14673 062003 


125 


116 


105 


062006 


130 


120 


105 


062011 


103 


124 


105 


062014 


104 


040 


120 


062017 


101 


122 


111 


062022 


124 


131 


040 


062025 


124 


122 


101 


062030 


120 


000 




14874 062032 


122 


105 


103 


062035 


105 


111 


126 


062040 


105 


104 


040 


062043 


104 


102 


105 


062046 


040 


106 


114 


062051 


101 


107 


040 


062054 


127 


110 


105 


062057 


116 


040 


105 


062062 


ISO 


120 


105 


062065 


103 


124 


111 


062070 


116 


107 


040 


062073 


117 


116 


114 


062076 


131 


040 


123 


062101 


102 


105 


040 


062104 


106 


114 


101 


062107 


107 


000 




14875 062111 


103 


110 


105 


062114 


103 


113 


040 


062117 


102 


111 


124 


062122 


040 


104 


101 


062125 


124 


101 


040 


062130 


105 


122 


122 


062133 


117 


122 


000 


14876 062136 


101 


104 


104 


062141 


122 


105 


123 


062144 


123 


040 


120 


062147 


101 


122 


111 


062152 


124 


131 


040 


062155 


105 


122 


122 


062160 


117 


122 


040 


062163 


104 


111 


104 


062166 


040 


116 


117 


062171 


124 


040 


103 


062174 


101 


125 


123 


062177 


105 


040 


101 


062202 


102 


117 


122 


062205 


124 


000 




14877 062207 


105 


103 


103 


062212 


040 


111 


116 


062215 


110 


111 


102 


062220 


111 


124 


040 


062223 


115 


117 


104 


062226 


105 


040 


120 


062231 


117 


111 


116 


062254 


124 


105 


122 


062237 


040 


106 


101 


062242 


111 


114 


125 


062245 


122 


105 


040 


062250 


055 


040 


104 



MACRO r05.02 Monday 07 -Oct -65 16:57 P»o« 457 3 



■ASCIZ /UNEXPECTED PARITY TRAP/ 



SEQ 0397 



.ASCIZ /RECEIVED OBE FLAG WHEN EXPECTING ONLY SBE FLAG/ 



.ASCIZ /CHECK BIT DATA ERROR/ 



.ASCIZ /ADDRESS PARITY ERROR DID NOT CAUSE ABORT/ 



•ASCIZ /ECC INHIBIT HOOE POINTER FAILURE - DID NOT PROTECT BANK/ 



^ V rr^MW w A A %/ 




DIAG. 


MACRO Y0S.02 




(EH) 






062253 


111 


104 


040 


062256 


116 


117 


124 


062261 


040 


120 


122 


062264 


117 


124 


105 


062267 


103 


124 


040 


062272 


102 


101 


116 


062275 


113 


000 




14B7B 062277 


103 


117 


122 En29: 


062302 


122 


105 


103 


062305 


124 


111 


117 


062310 


116 


040 


106 


062313 


101 


111 


114 


062316 


125 


122 


105 


062321 


040 


127 


111 


062324 


124 


110 


040 


062327 


105 


103 


103 


062332 


040 


105 


116 


062335 


101 


102 


114 


062340 


105 


104 


040 


062343 


117 


116 


040 


062346 


106 


117 


122 


062351 


103 


105 


104 


062354 


040 


123 


102 


062357 


105 


000 




14879 062361 


127 


122 


111 En30: 


062364 


124 


105 


040 


062367 


102 


131 


124 


062372 


105 


040 


127 


062375 


111 


124 


110 


062400 


040 


105 


103 


062403 


103 


040 


105 


062406 


116 


101 


102 


062411 


114 


105 


104 


062414 


040 


106 


101 


062417 


111 


114 


105 


062422 


104 


040 


124 


062425 


117 


040 


103 


062430 


114 


105 


101 


062433 


122 


040 


104 


062436 


101 


124 


101 


062441 


040 


101 


124 


062444 


200 






14SaO 062445 


106 


117 


122 


062450 


103 


105 


104 


062453 


040 


123 


102 


062456 


105 


C40 


114 


062461 


117 


103 


101 


062464 


124 


111 


117 


062467 


116 


000 




14S81 062471 


115 


117 


126 EnS2: 


062474 


102 


040 


043 


062477 


063 


066 


060 


062502 


054 


050 


122 


062505 


062 


051 


053 


062510 


040 


127 


111 


062513 


124 


110 


040 


062516 


105 


103 


103 



Monday 07 -Oct -85 16:57 Pag« 457-4 



SEQ 0396 



.ASCIZ /CORRECTION FAILURE UITH ECC ENABLED ON FORCED SBE/ 



.ASCII /WRITE BYTE UITH ECC ENABLED FAILED TO CLEAR DATA AT/<CRLF> 



.ASCIZ /FORCED SBE LOCATION/ 



.ASCIZ /MOVB •360. (R2)* UITH ECC ENABLED CHANGED DATA AT FQriCED OBE LOCATION/ 



cvnjABO nsvii-J 


riEnORY 


OIAG. 


nACRO Y05.02 


ERROR MESSAGES 


(EM) 






062521 


040 


105 


116 


062524 


101 


102 


114 


062527 


105 


104 


040 


0625S2 


103 


110 


101 


062535 


116 


107 


105 


062340 


104 


040 


104 


062543 


101 


124 


101 


062546 


040 


101 


124 


062551 


040 


106 


117 


062554 


122 


103 


105 


062557 


104 


040 


104 


062562 


102 


105 


040 


062565 


114 


117 


103 


062570 


101 


124 


111 


062573 


117 


116 


000 


14662 062576 


115 


117 


126 En3S: 


062601 


040 


043 


061 


062604 


067 


067 


064 


062607 


060 


060 


054 


062612 


050 


122 


061 


062615 


051 


040 


127 


062620 


111 


124 


110 


062623 


040 


105 


103 


062626 


103 


040 


105 


062631 


116 


101 


102 


062634 


114 


105 


104 


062637 


040 


103 


110 


062642 


101 


116 


107 


062645 


105 


104 


040 


062650 


104 


101 


124 


062653 


101 


040 


101 


062656 


124 


040 


106 


062661 


117 


122 


103 


062664 


105 


104 


040 


062667 


104 


102 


105 


062672 


040 


114 


117 


062675 


103 


101 


124 


062700 


111 


117 


116 


062703 


000 






14883 062704 


125 


116 


105 EnS5: 


062707 


130 


120 


105 


062712 


103 


124 


105 


062715 


104 


040 


103 


062720 


117 


122 


122 


062723 


105 


103 


124 


062726 


111 


117 


116 


062731 


040 


127 


111 


062734 


124 


lie 


040 


062737 


105 


103 


103 


062742 


040 


104 


111 


062745 


123 


101 


102 


062750 


114 


105 


040 


062753 


117 


116 


040 


062756 


106 


117 


122 


062761 


103 


105 


104 


062764 


040 


123 


102 


062767 


105 


000 





Monday 07 -Oct -65 16:57 Pag* 457-5 



SEQ 0S99 



.ASCIZ /MOV «177400,(R1) WITH ECC ENABLED CHANGED DATA AT FORCED OSE LOCATION/ 



.ASCIZ /UNEXPECTED CORRECTION UITH ECC DISABLE ON FORCED SBE/ 



CVhJASO MSVll-J MEMORt 01 ^G. 



ERROR MESSAGES 


(EM) 






14884 062771 


101 


120 


124 


062774 


040 


123 


111 


062777 


132 


105 


040 


063002 


104 


111 


123 


065005 


101 


107 


122 


063010 


105 


105 


123 


063013 


040 


127 


111 


063016 


124 


110 


040 


063021 


120 


122 


117 


063024 


107 


122 


101 


063027 


115 


040 


123 


063032 


111 


132 


111 


063035 


116 


107 


000 


14885 063040 


102 


122 


101 


063043 


116 


103 


110 


063046 


040 


107 


117 


063051 


102 


102 


114 


063054 


105 


040 


106 


063057 


101 


111 


114 


063062 


105 


104 


040 


063065 


103 


117 


116 


063070 


104 


111 


124 


063073 


111 


117 


116 


063076 


040 


103 


117 


063101 


104 


105 


123 


063104 


040 


124 


105 


063107 


123 


124 


000 


14886 063112 


102 


101 


104 


063115 


040 


105 


122 


063 120 


122 


117 


122 


06S12S 


040 


101 


104 


063126 


104 


122 


105 


063131 


123 


123 


040 


063134 


107 


105 


116 


063137 


105 


122 


101 


063142 


124 


105 


104 


063145 


000 






14887 063146 


106 


114 


101 


063151 


107 


123 


040 


063154 


116 


117 


124 


063157 


040 


123 


105 


063162 


124 


040 


117 


063165 


116 


040 


106 


063170 


117 


122 


103 


063173 


105 


104 


040 


063176 


125 


116 


103 


063201 


117 


122 


122 


063204 


105 


103 


124 


063207 


105 


104 


040 


063212 


123 


102 


105 


063215 


000 






14888 063216 


102 


111 


124 


063221 


040 


123 


105 


063224 


124 


040 


105 


063227 


122 


122 


117 


063232 


122 


040 


111 


063235 


116 


040 


103 



MACRO Y05.02 Monday 0'«-Oct-eS 16:57 P*g« 457-6 

H36: .ASCIZ /APT SIZE DISAGREES UITH PROGRAM SIZING/ 



.ASCIZ /BRANCH GOBBLE FAILED CONDITION COOES TEST/ 



.ASCIZ /BAD ERROR ADDRESS GENERATED/ 



.ASCIZ /FLAGS NOT SET ON FORCED UNCORRECTED SBE/ 



.ASCIZ /BIT SET ERROR IN CSR/ 



CvnjABO nsvii-J 




OIAG. 


MACRO 


ERROR nESSAGES 


(EM) 






063240 


123 


122 


000 


14869 06324S 


102 


m 


124 


063246 


040 


103 


114 


063251 


105 


101 


122 


063254 


040 


105 


122 


063257 


122 


117 


122 


063262 


040 


111 


116 


063265 


040 


103 


123 


063270 


122 


000 




14690 063272 


111 


114 


114 


063275 


105 


107 


101 


063300 


114 


040 


103 


063303 


125 


122 


040 


063306 


124 


131 


120 


063311 


105 


000 




14691 063313 


102 


101 


104 


063316 


040 


120 


101 


063321 


122 


111 


124 


063324 


131 


040 


124 


06SS27 


122 


101 


120 


06SSS2 


040 


107 


105 


06S3SS 


116 


105 


122 


063340 


101 


124 


105 


063343 


104 


000 




14692 063345 


127 


122 


117 


06SSS0 


116 


107 


040 


063353 


103 


110 


105 


063356 


103 


115 


040 


063361 


102 


111 


124 


063364 


040 


122 


105 


063367 


101 


104 


040 


063372 


102 


101 


103 


063375 


lis 


040 


106 


06S400 


122 


117 


lis 


06S403 


040 


lis 


ICS 


065406 


lis 


117 


122 


063411 


131 


000 


117 


14893 065413 


127 


122 


0634 16 


116 


107 


040 


063421 


123 


131 


116 


063424 


104 


122 


117 


063427 


lis 


105 


040 


065432 


102 


111 


124 


063435 


123 


040 


122 


063440 


105 


101 


104 


065443 


040 


111 


116 


065446 


124 


117 


040 


06S4S1 


ICS 


123 


122 


06S4S4 


000 






14894 06S4SS 


103 


123 


122 


063460 


040 


125 


120 


065463 


104 


101 


124 


065466 


105 


040 


105 


063471 


122 


122 


117 


063474 


122 


000 




14695 063476 


120 


122 


117 


06SS01 


103 


105 


123 



MACRO Y0S.02 Henday 07 -Oct -85 16:57 Paft* 457 -7 



.ASCIZ /BIT CLEAR ERROR IN CSR/ 



SEQ 0401 



.ASCIZ /ILLE'AL CSR TYPE/ 



.ASCIZ /BAD PARITY TRAP GENERATED/ 



.ASCIZ /WRONG CHECK BIT READ BACK FROn MEnORY/ 



.ASCIZ /WRONG SYNDROME BITS READ INTO CSR/ 



.ASCIZ /CSR UPDATE ERROR/ 



.ASCIZ /PROCESSOR NOT SUPPORTED BY THIS DIAGNOSTIC/ 



CVnjASO nsvil-J nEnORY OIAG. macro Y0S.02 nondmy 07-0ct-6S 16:57 Pm* 457-8 

ERROR MESSAGES (En) SEQ 040? 



06SSO4 


123 


117 


122 


063507 


040 


116 


117 


063512 


124 


040 


123 


063515 


125 


120 


120 


063S20 


117 


122 


124 


06SS23 


105 


104 


040 


063526 


102 


131 


040 


063531 


124 


110 


111 


063534 


123 


040 


104 


063537 


111 


101 


107 


063542 


116 


117 


123 


063545 


124 


111 


103 


069550 


000 







cvnjAeo nsvii-j mehupy ozag. 

ERROR DATA HEADERS (OH) 



14696 






120 


14699 063551 


040 


040 


063554 


103 


040 


040 


063557 


040 


104 


105 


063562 


126 


040 


101 


063565 


104 


104 


040 


063570 


040 


040 


107 


063573 


117 


117 


104 


063576 


040 


040 


040 


063601 


040 


102 


101 


063604 


104 


000 




14900 063606 


040 


040 


120 


063611 


103 


040 


040 


063614 


040 


107 


104 


063617 


055 


103 


103 


063622 


040 


102 


104 


063625 


055 


103 


103 


063630 


000 






14901 063631 


040 


040 


120 


063634 


103 


040 


040 


063637 


040 


061 


123 


063642 


124 


040 


101 


063645 


104 


104 


040 


063650 


040 


043 


040 


063653 


117 


106 


040 


063656 


105 


122 


122 


063661 


117 


122 


123 


063664 


000 






14902 063665 


040 


040 


120 


063670 


103 


040 


040 


063673 


040 


040 


040 


063676 


115 


115 


122 


063701 


060 


040 


040 


063704 


040 


040 


115 


063707 


115 


122 


061 


063712 


040 


040 


040 


C63715 


040 


115 


115 


063720 


122 


062 


040 


063723 


040 


040 


040 


063726 


115 


115 


122 


063731 


063 


040 


040 


063734 


040 


103 


120 


063737 


125 


105 


122 


063742 


122 


000 




14903 063744 


040 


040 


120 


063747 


103 


040 


040 


063752 


040 


101 


120 


063755 


124 


120 


101 


063760 


122 


040 


040 


063763 


040 


114 


123 


063766 


111 


132 


105 


063771 


040 


040 


101 


063774 


120 


124 


105 


063777 


103 


103 


040 


064002 


0*0 


lis 


123 


C6400S 


111 


132 


105 


064010 


000 







HACRO Y0S.02 Monday 07 -Oct -65 16:57 Pag* 459 



.SBTTL ERROR DATA HEADERS (OH) 
.ASCIZ / PC DEV ADO GOOD BAD/ 



SEQ 0403 



.ASCIZ / PC GD-CC BD-CC/ 



.ASCIZ / PC 1ST ADO « OF ERRORS/ 



.ASCIZ / PC MHRo MMRi rmz mn cpuerr/ 



.ASCIZ / PC APTPAR LSIZE APTECC HSIZE/ 



14904 





OIAG. 


MACRO 1 


064011 


040 


040 


120 






040 


040 






040 


\9i 




101 


116 


113 






040 


126 






104 


104 




040 


040 


040 




040 


040 


120 


nAA041 


lOl 

xvx 


104 


104 




040 


040 


040 




040 


040 


107 




117 


117 


104 


\J\3^ V J J 


040 


040 


040 




040 


040 


102 


0M06S 


101 


104 


040 


064066 


040 


040 


040 


064071 


040 


130 


117 


064074 


122 


040 


040 


064077 


103 


123 


122 


Ave 


040 


040 


115 




124 


131 


120 


064110 


040 


111 


116 


A A •J 


124 


040 


120 


064116 


101 


124 


000 


064121 


040 


040 


122 


064124 


060 


040 


040 


064127 


040 


040 


040 


064132 


040 


122 


061 


064135 


040 


040 


040 


064140 


040 


040 


040 


064 143 


122 


062 


040 


064146 


040 


040 


040 




040 


040 


122 


0641S4 


063 


040 


040 


064157 


040 


040 


040 


064162 


040 


122 


064 


064165 


040 


040 


040 


064170 


040 


040 


040 


064173 


122 


065 


040 


064176 


040 


040 


040 


064201 


040 


040 


123 


064204 


120 


040 


040 


064207 


040 


040 


040 


064212 


040 


120 


123 


064215 


127 


000 




064217 


040 


040 


120 


064222 


103 


040 


040 


064225 


040 


040 


040 


064230 


040 


103 


123 


064233 


122 


000 




064235 


040 


103 


123 


064240 


122 


000 




064242 


040 


040 


120 


064245 


103 


040 


040 


064250 


040 


040 


102 


064253 


101 


116 


113 


064256 


040 


040 


126 



MACRO Y05.02 Monday 07 Oct-85 16:57 P»g« 459-1 

■47: .ASCII / PC BANK VAOO PAOD GOOD/ 



.ASCIZ / BAD XOR CSR MTyP INT PAT/ 



. ASCIZ / RO 



Rl R2 R3 R4 



R5 



, ASCIZ / PC CSR/ 

.ASCIZ / CSR/ 

.ASCII / PC BANK VAOO PAOD UROTEl UR0TE2/ 



CVMJABO MSVll-J MEMORY DIAG. 
ERROR DATA HEADERS (OH) 



MACRO Y05.02 Monday 07-Oct-aS 16:57 P*g« 459-2 



SEQ 040'' 





064261 


101 


104 


104 






064264 


040 


040 


040 






064267 


040 


040 


120 






064272 


101 


104 


104 






064275 


040 


040 


040 






064500 


040 


127 


122 






064303 


117 


124 


105 






064306 


061 


040 


A^ A 

040 






064311 


127 


122 


117 






064314 


124 


4 AK 

105 


AiC "k 

062 




14910 


064317 


040 


• AV 

103 


4 4 A 

110 




064322 


113 


4 A '\ 

102 


111 






064 325 


124 


• AV 

123 


040 






064330 


040 


040 


A^ A 

040 






064333 


103 


123 


122 






064336 


000 








14911 


064337 


103 


117 


116 


DH14 : 


064342 


124 


122 


114 






064 345 


040 


040 


AAA 

040 






064350 


115 


115 


4 AA 

122 






064353 


060 


040 


040 






064356 


040 


040 


4 f C 

113 






064361 


115 


122 


AX 4 

061 






064364 


040 


A^ A 

040 


AXA 
O^O 






064367 


040 


4 4 C 

115 


4 4 C 
113 






064372 


122 


A^ A 

0o2 


AXA 

040 






064975 


040 


040 


AXA 

o#o 






064400 


115 


lie 
115 


4 

122 






064403 


A< V 

065 


040 


AXA 
O^O 






064406 


040 


4 AV 

103 


1 OA 

120 






064411 


125 


4 AC 
105 


1 oo 
122 






064414 


122 


AAA 
OOO 






14912 


064416 


040 


f\M A 

040 


4 OA 

120 


nkii c . 


064421 


4 AV 

103 


f\M A 

o#o 


AXA 






064424 


A^ A 

040 


AJ A 

o#o 


4 AO 
102 






064427 


• A 4 

101 


4 4 £ 

116 


4 4 T 

113 






064432 
06443!) 


040 


04U 


AXA 






040 


120 


4 A4 
lOl 






064440 


4 A^ 

104 


104 


AXA 






064443 


A^ A 

040 


040 


4 A7 

107 






064446 


4 A^ 

104 


059 


4 07 

127 






064451 


4 A^ 

104 


A^l 

oel 


AXA 

o#o 






064454 


040 


4 A^ 

107 


4 AX 
lO* 






064457 


acc 
055 


127 


4 AX 
104 






064462 


AX ^ 

062 


AX A 

040 


AXA 

o*o 






064465 


4 A^ 

107 


4 AX 

104 


ACC 

033 






064470 


4 

lOO 


1 4 A 
110 


114 




14913 


064473 


A^ A 

040 


4 AO 
102 


4 A4 
101 






064476 


104 


ACS 

OSS 


4 07 

127 












w^w 






064504 


102 


101 


104 






064507 


055 


127 


104 






064512 


062 


040 


040 






064515 


102 


101 


104 






064520 


055 


103 


110 






064523 


113 


040 


111 






064526 


116 


124 


040 





.ASCIZ / CHKBITS CSR/ 



.ASCIZ /CONTRL MMRO MMRl MMR2 MMR3 CPUERR/ 



.ASCII / PC BANK PAOD GO UOl GD-U02 GO CHK/ 



.ASCIZ / BAO-WOl BA0-W02 BAO-CHK INT PAT/ 



CvnjABo Msvii-J rcnoRr diag. 

ERROR DATA HEADERS (DH) 



064S31 


120 


101 


124 


064534 


000 






14914 064SS5 


040 


040 


120 


064S40 


103 


040 


040 


064S4S 


040 


040 


102 


064346 


101 


116 


113 


064551 


000 






14915 064552 


040 


040 


120 


064555 


103 


000 




14916 064557 


040 


040 


120 


064562 


103 


040 


040 


064565 


040 


040 


102 


064570 


101 


116 


113 


064573 


040 


107 


104 


064576 


055 


103 


123 


064601 


122 


040 


040 


064604 


050 


103 


123 


064607 


122 


051 


040 


064612 


040 


103 


123 


064615 


122 


040 


040 


064620 


lis 


124 


131 


064623 


120 


040 


111 


064626 


116 


124 


040 


064631 


040 


120 


101 


064634 


124 


000 




14917 064636 


040 


040 


120 


064641 


103 


040 


040 


064644 


040 


040 


102 


064647 


101 


116 


lis 


064652 


040 


107 


104 


0646SS 


OSS 


lOS 


122 


064660 


122 


040 


102 


064663 


101 


104 


OSS 


064666 


105 


122 


122 


064671 


040 


103 


123 


064674 


122 


040 


040 


064677 


lis 


124 


131 


064702 


120 


040 


111 


064705 


116 


124 


040 


064710 


040 


120 


101 


064713 


124 


000 




14910 064715 


040 


040 


120 


064720 


103 


040 


040 


064723 


040 


040 


102 


064726 


101 


116 


113 


064731 


040 


040 


OSO 


064734 


103 


123 


122 


064737 


OSl 


040 


103 


064742 


123 


122 


040 


064745 


040 


lis 


124 


064750 


131 


120 


040 


064753 


IIJ 


116 


124 


064756 


040 


040 


120 


0647ol 


101 


124 


000 


14919 064764 


040 


040 


120 


064767 


103 


040 


040 


064772 


040 


040 


107 



MACRO Y05.02 Monday 07-Oct 85 16:57 Bag* 459 3 



.ASCIZ / PC BANK/ 



SEQ 0406 



.ASCIZ / PC/ 

.ASCIZ / PC BANK GO-CSR (CSR) CSR MTYP INT PAT/ 



.ASCIZ / PC BANK GD-ERR BAO-ERR CSR MTYP INT PAT/ 



.ASCIZ / PC BANK (CSR) CSR MTYP INT PAT/ 



.ASCIZ / PC GD-DAT (CSR) CSRNO/ 



CvriJABO MSVll-J MEMORY OIAG. 
ERROR DATA HEADERS (OH) 



MACRO Y05.02 Mond«y 07-Oct 85 16:57 Pafl* 459-4 



SEQ 0407 



064775 


104 


055 


104 




065000 


101 


124 


040 




065003 


040 


050 


103 




065006 


123 


122 


051 




065011 


040 


040 


040 




065014 


103 


123 


122 




065017 


116 


117 


000 




14920 0^5022 


040 


040 


120 


0H26: 


065025 


103 


040 


040 




06S0S0 


102 


101 


104 




065033 


103 


117 


104 




065036 


105 


000 






14921 065040 


040 


040 


120 


0H27: 


065043 


103 


040 


040 




065046 


040 


040 


102 




065051 


101 


116 


113 




065054 


040 


040 


126 




065057 


101 


104 


104 




065062 


040 


040 


040 




065065 


040 


040 


120 




065070 


101 


104 


104 




065073 


040 


040 


040 




065076 


103 


123 


122 




065101 


040 


040 


lis 




065104 


124 


131 


% '^A 

120 




065107 


040 


120 


4 A« 

101 




065112 


124 


000 






14922 065114 


040 


040 


120 


AU V A _ 


065117 


103 


040 


AA A 




065122 


040 


040 


4 A^ 

102 




065125 


101 


116 


113 




065130 


040 


040 


A^ A 

040 




065133 


120 


101 


4 Ail 

104 




065 136 


104 


A^ A 

040 


A^ A 

040 




065141 


040 


A^ A 

040 


127 




mm MM 

0651** 


Ice 


117 






065147 


105 


040 


040 




065152 


040 


040 


122 




065155 


105 


101 


104 




065160 


040 


040 


103 




065163 


123 


122 


040 




065166 


040 


120 


101 




065171 


124 


000 







.ASCIZ / PC BAOCODE/ 



.ASCIZ / PC BANK VADD PADO CSR MTYP PAT/ 



.ASCIZ / PC BANK PADD UROTE READ CSR PAT/ 



CVMJABO MSVll-J MEMORY DIAG. 
MESSAGES 

14925 



14926 065173 


200 


040 


040 


065176 


040 


040 


040 


065201 


040 


040 


040 


065204 


040 


040 


040 


065207 


040 


040 


040 


065212 


040 


040 


040 


065215 


040 


040 


040 


065220 


040 


040 


040 


065223 


040 


115 


105 


065226 


115 


117 


122 


065231 


131 


040 


103 


065234 


117 


116 


106 


065237 


111 


107 


125 


065242 


122 


101 


124 


065245 


111 


117 


116 


065250 


040 


115 


101 


065253 


120 


000 




14927 065255 


200 


040 


040 


065260 


040 


040 


040 


065263 


040 


040 


040 


065266 


040 


040 


040 


065271 


040 


040 


040 


065274 


040 


040 


040 


065277 


040 


040 


040 


065302 


040 


040 


040 


065305 


040 


040 


040 


065310 


040 


040 


040 


065313 


061 


066 


113 


065316 


040 


127 


117 


065321 


122 


104 


040 


065324 


102 


101 


116 


065327 


113 


123 


000 


14926 065332 


200 


040 


040 


065335 


040 


040 


040 


065340 


040 


040 


040 


065343 


040 


040 


040 


065346 


040 


040 


040 


065351 


040 


040 


061 


065354 


040 


040 


040 


065357 


040 


040 


040 


065362 


040 


062 


040 


065365 


040 


040 


040 


065370 


040 


040 


040 


065373 


063 






14929 065374 


040 


040 


040 


065377 


040 


040 


040 


065402 


040 


064 


040 


06S405 


040 


040 


040 


065410 


040 


040 


040 


065413 


065 


040 


040 


065416 


040 


040 


040 


065421 


040 


040 


066 


065424 


040 


040 


040 


065427 


040 


040 


040 


065432 


040 


067 


040 


065435 


040 


000 





MACRO Y05.02 Monday 07-0ct-8S 16:57 Pag* 461 



.SBTTL MESSAGES 
MSGOOl: .ASCIZ <CRLF>/ 



SEQ 0408 



MEMORY CONFIGURATION MAP/ 



MSG002: .ASCIZ <CRLF>/ 



16K UORD BANKS/ 



nSGOOS: .ASCII <CRLF>/ 



3/ 



.ASCIZ / 



7 / 



CVMJABO nSVll-J MEnOAY 01 AG. 
MESSAGES 



nACRO Y05.02 Monday 07 -Oct -85 16:57 Pag* 461-1 



SEQ 0409 



14930 06S4S7 


200 


040 


040 


065442 


040 


040 


040 


065445 


040 


040 


040 


065450 


060 


061 


062 


065453 


063 


064 


065 


065456 


066 


067 


060 


065461 


061 


062 


063 


065464 


064 


065 


066 


065467 


067 


060 


061 


065472 


062 


065 


064 


065475 


065 


066 


067 


14931 065500 


060 


061 


062 


065503 


063 


064 


065 


065506 


066 


067 


060 


065511 


061 


062 


063 


065S14 


064 


065 


066 


065517 


067 


060 


()6l 


065522 


062 


063 


J64 


065525 


065 


066 


067 


065530 


060 


061 


062 


065533 


063 


064 


065 


065536 


066 


067 


060 


065541 


061 


062 


063 


065544 


000 






14932 065545 


200 


105 


122 


065550 


122 


117 


122 


065553 


123 


040 


040 


065556 


000 






14933 065557 


200 


125 


116 


065562 


104 


105 


106 


065365 


111 


116 


105 


065570 


104 


040 


124 


065573 


122 


101 


120 


065576 


040 


111 


116 


06S601 


123 


124 


122 


065604 


125 


103 


124 


06S607 


111 


117 


116 


065612 


032 


000 




14934 065614 


200 


115 


105 


065617 


115 


124 


131 


065622 


120 


105 


040 


065625 


000 






14935 065626 


200 


120 


122 


065631 


117 


124 


105 


065634 


103 


124 


040 


065637 


000 






14936 065640 


040 


040 


040 


065643 


040 


061 


040 


065646 


040 


040 


040 


065651 


040 


040 


040 


065654 


061 


040 


040 


065657 


040 


040 


040 


065662 


040 


040 


061 


065665 


040 


040 


040 


065670 


040 


040 


040 


065673 


040 


061 


040 


065676 


040 


040 


040 



.ASCII <CRLF>/ 



012345670123456701234567/ 



. ASCIZ /012345670123456701234567012345670123/ 



.ASCIZ <CRLF>/UNOEriNED TRAP INSTRUCTI0N/<32> 



.ASCIZ <CRLF>/MEf1TYPE / 



.ASCIZ <CRLF>/PR0TECT / 



: MEMORY TYPE 
.•MEMORY PROTECTED 



1/ 



CVMJABO MSVll-J MEMORY OIAG. 
MESSAGES 



MACRO Y05.02 Monday 07-0ct-85 1«:57 Page 461-2 



SEQ 0410 





065701 


040 


AAA 

040 


AAA 

040 




065704 


061 


040 


J40 




065707 


040 


040 


AAA 

040 




065712 


AAA 

040 


040 


061 




065715 


040 


040 


AAA 

040 




065720 


040 


040 


AA A 

040 




065723 


040 


AX t 

061 


AAA 

000 


14937 


065726 


040 


AA A 

040 


A A A 

040 




065731 


040 


AX A 

060 


A A A 

O40 




065754 


AA A 

O40 


AAA 

040 


AAA 

040 




065737 


AAA 

040 


AA A 

040 


AAA 

040 




065742 


AX 4 

061 


A A A 

O40 


AAA 

040 




06S74S 


AAA 

040 


AAA 

040 


AA A 

040 




065730 


AAA 

040 


AAA 

040 


AX '% 

062 




065733 


AAA 

04U 


AAA 

040 


AAA 

040 




063736 


AAA 


AAA 
040 


AAA 




063761 


AAA 


AAV 


AAA 




063764 


AAA 


AAA 

040 


AAA 




OB3 ro r 


AAA 


AAA 


AAA 




0637 Id. 


AAA 


AAA 


AAA 




063773 


AAA 

040 


AAA 


AAA 

040 




066 Ovv 


AAA 


AAA 


AAiC 

063 




AA^AAV 

0D6009 


AAA 


AAA 


AAA 






AAA 




AAA 




060U11 


AAA 


AAA 


AAA 


14y30 


AA^Af A 


AAA 


AAC 


AAA 
UOO 




AJL.X.A4 "7 
UOOOl ' 


AA7 


AAA 


AA1 
UOX 




066022 


AA^ 


AAT 


AAA 
OO* 




0eou23 


AAC 




AA7 
UO t 








VOX 








AA1 


AAA 


AAC 
UOO 




066036 


AA& 


AA'7 


l^AA 
UOU 






AA 1 


AA3 


AAV 
UOO 




066044 


AAA 

064 


AA<« 


AAA 
UOO 




06o04 r 


AA'7 


AAA 


AA1 
UOX 




UOOU3C 


woe 


AAV 


AAA 
WO* 




066033 


AA< 
U03 


AAA 


AA7 
UO t 




^WLXA&A 


AAA 


UOX 


woa 






AAV 


AAA 


AA^ 
U09 






AAA 


AA7 
UO i 


AAA 
UOU 




VDOV ' 1 


AA1 
vol 


AA3 
U02 


AAV 
UOO 






AAA 


AAC 


UOO 






AA7 


AAA 


AA1 
UOX 








AAV 
UOd 


AA4 
UO* 




AAA 1 AC 


AAC 


AAA 
UOO 


AA7 
UO f 






AAA 










AA1 


AAA 




14940 


066113 


AA7 


AAA 




14941 


06611S 


AAA 


AA1 
UOX 


AA3 
UOs 




066120 


06S 


064 


065 




066123 


066 


067 


000 


14942 


066126 


130 


000 




14943 


066130 


040 


AOO 




14944 


0661S2 


000 


000 




14945 0661S4 


200 


103 


123 




066137 


122 


040 


040 




066142 


040 


040 


040 



MSGOll: .ASCIZ / 



6/ 



nSG012: . ASCIZ /4S670123456701234567012345670123456701234S6701234567012S4567/ 



MSGllB 
MSGllC 
MSGllO 



.ASCIZ /I/ 
.ASCIZ /7/ 
.ASCIZ /012S4567/ 



MSG013: .ASCIZ /X/ 

MSG014: .ASCIZ / / 

nSGOlSi .BYTE 0.0 

nSG016: .ASCIZ <CRLF>/CSR 



I SPACE 

(FOR SINGLE ASCII CHARACTERS C TERMINATOR 



CVMJA80 MSVll 
HESSAGCS 



■J ncnoRY OZAG. 





066145 


000 






14946 


066146 


040 


040 


040 


066151 


040 


040 


040 




066154 


040 


040 


000 


14947 


066157 


040 


040 


000 


1494S 


066162 


040 


040 


040 




066165 


000 






14949 


066166 


200 


106 


123 


066171 


040 


103 


117 




066174 


115 


115 


101 




066177 


116 


104 


040 




066202 


115 


117 


104 




066205 


105 


000 




149S0 


066207 


200 


103 


117 


066212 


115 


115 


101 




066215 


116 


104 


123 




066220 


040 


101 


126 




066223 


101 


111 


114 




066226 


101 


102 


114 




066231 


105 


072 




14951 


0662S3 


200 


060 


040 




066236 


075 


040 


105 




066241 


130 


111 


124 


14952 


066244 


200 


061 


040 




066247 


075 


040 


122 




066252 


105 


101 


104 




066255 


040 


103 


123 




066260 


122 






14955 


066261 


200 


062 


040 


066264 


075 


040 


114 




066267 


117 


101 


104 




066272 


040 


103 


123 




066275 


122 






14954 


066276 


200 


063 


040 




066301 


075 


040 


105 




066304 


130 


101 


115 




066307 


111 


116 


105 




066312 


040 


115 


105 




066315 


115 


117 


122 




066320 


131 






14955 


066321 


200 


064 


040 


066324 


075 


040 


115 




066327 


117 


104 


111 




066332 


106 


131 


040 




0663SS 


115 


105 


lis 




066340 


117 


122 


131 


14956 


066343 


200 


065 


040 




066346 


075 


040 


123 




066351 


105 


114 


105 




066354 


103 


124 


040 




066357 


102 


101 


116 




066362 


113 


040 


046 




066365 


040 


124 


105 




066370 


123 


124 




14957 


066372 


200 


066 


040 




066375 


075 


040 


124 




C66400 


131 


120 


105 



nACRO Y05.02 Hentfay 07-0ct-S5 16:57 Pag* 461-3 



.ASCIZ / / :8 SPACES 



.ASCIZ / / 1 2 SPACES 

.ASCIZ / / J 3 SPACES 

.ASCIZ <CRLF;/FS COMMANO MODE/ 



.ASCII <CRLF>/COMnANOS AVAILABLE:/ 



SEQ 0411 



.ASCII <CRLF>/0 - EXIT/ 

.ASCII <CRLF>/1 - READ CSR/ 

.ASCII <CRLF>/2 - LOAD CSR/ 

.ASCII <CRLF>/3 - EXAMINE MEMORY/ 



.ASCII <CRLF>/4 - MODIFY MEMORY/ 



.ASCII <CRLF>/5 - SELECT BANK £ TEST/ 



.ASCII <CRLF>/6 - TYPE CONFIG MAP/ 



CVMJA80 MSVll-J MEMORY DIAG. MACRO Y05.0 
MESSAGES 



066403 


040 


103 


117 


066406 


116 


106 


111 


066411 


107 


040 


lis 


066414 


101 


120 




066416 


200 


067 


040 


066421 


075 


040 


123 


066424 


117 


102 


OSS 


066427 


101 


055 


114 


066432 


117 


116 


107 


066435 


040 


124 


105 


066440 


123 


124 




066442 


200 


070 


040 


066445 


075 


040 


105 


066450 


122 


122 


117 


066453 


122 


040 


123 


066456 


125 


115 


115 


066461 


101 


122 


131 


066464 


200 


071 


075 


066467 


040 


040 


122 


066472 


105 


106 


122 


066475 


105 


123 


110 


066500 


040 


124 


105 


066503 


123 


124 




066505 


200 


061 


060 


066510 


075 


040 


123 


066513 


105 


124 


040 


066^16 


106 


111 


114 


066b21 


114 


040 


103 


066524 


117 


125 


116 


066527 


124 






066530 


200 


061 


061 


066533 


075 


040 


105 


066536 


116 


124 


105 


066541 


122 


040 


113 


066544 


101 


115 


111 


066547 


113 


101 


132 


066552 


105 


040 


115 


066555 


117 


104 


105 


066560 


200 


061 


062 


066563 


075 


040 


105 


066566 


130 


111 


124 


066571 


040 


113 


101 


066574 


115 


111 


113 


066577 


101 


132 


105 


066602 


040 


lis 


117 


066605 


104 


105 




066607 


200 


061 


063 


066612 


075 


040 


124 


066615 


125 


122 


116 


066620 


040 


103 


101 


066623 


103 


110 


105 


066626 


040 


117 


106 


066631 


106 






066632 


200 


061 


064 


066635 


075 


040 


124 


066640 


125 


122 


116 


066643 


040 


103 


101 



Monday 07-0ct-8S 16:S7 P»g« 461-4 



.ASCII <CRLF>/7 - S08-A-L0NG TEST/ 



.ASCII <CRLF>/8 - ERROR SUMMARY/ 



•ASCII <CRLF>/9- REFRESH TEST/ 



.ASCII <CRLF>/10- SET FILL COUNT/ 



.ASCII <CRLF>/11« ENTER KAMIKAZE MODE/ 



.ASCII <CRLF>/12- EXIT KAMIKAZE MODE/ 



.ASCII <CRLF>/13- TURN CACHE OFF/ 



.ASCII <CRLF>/14- TURN CACHE ON/ 



CVMJAeO fISVll-J MEMORY DI*G. 
neSSAGCS 



14966 



14967 



14966 



14969 



14970 
14971 



14972 
14973 



14974 



14975 



14976 





XUd 


1 1 o 


XV J 




v^u 


117 


1 1 f> 

IXO 




cW 


Wl 


06S 




A7^ 


AAO 


xc^ 




XU3 




xc^ 




AAA 


IC J 


105 
xvj 


WOO ' U 


X X^ 




103 

XV J 


VOOO t d 


1 OA 
Xc^ 


105 

xv^ 


1 0A 
xv^ 


VOOO 'O 


AAA 

V^V 


109 

IVC 


101 
xvx 


VOO r 


1 Ilk 

xxo 


113 
xx^ 


123 

XCW 


VDO r 


9AA 


061 
wx 


OM 
wv 




07^ 


OAO 


12A 


UOO r XC 


IAS 
xv^ 


123 

XCw 




VOO r 


AAA 


101 
xvx 


114 

xx^ 


AM70A 
VOO • C V 




040 

w ^ w 


102 


VOO ■ 


101 


116 

XXV 


lis 

XX V 


VOO ■ CO 


IPS 






voo • c • 


POO 


061 

WX 


067 


wv • 


075 


040 


105 




116 


101 

xwx 


102 




114 


105 

X 


040 


wv • ^ J 


1P4 


IPP 

XKC 


101 

xwx 


wv ■ ~V 


103 

X V w 


105 

X 




voo • 


POO 


061 
wx 


070 


voo ' 9w 


075 


040 


104 


voo » ^o 


111 

XXX 


123 

XC V 


101 


wv • vx 


lOP 
xvc 


114 

X X^ 


105 


wv • v^ 


O40 


124 

X 


122 


OM7&7 

wv ■ V r 


101 
xvx 


103 


105 


voo « ■ c 


015 

VX^ 


012 


000 


voo » r J 


200 


127 


110 


W r *^/W 


111 

XXX 


103 


110 


VO f 


A40 


103 


123 


W • Ww 


122 

X&C 


050 


060 


W > VX J» 


055 


106 


051 


w > vx~ 


077 


040 


000 


067017 


200 


103 


123 


067022 


122 

xss 


040 


127 


06702S 


117 

XX' 


122 


104 


067030 


077 


040 


000 


0670SS 


200 


103 


123 


0670S6 


122 

XS* 


040 


104 


067041 


117 

X X > 


105 

X 


123 


067044 


040 


116 


117 


067047 


124 

XC^ 


040 


105 


067099 


130 

xwv 


111 

XXX 


123 

XK w 


0670SS 


124 


000 




067057 


200 


103 


117 


W ■ Wfla 


115 

XX^ 


115 

XX ^ 


101 


067065 


116 


104 


072 


067070 


000 






067071 


200 


117 


114 


067074 


104 


040 


103 


067077 


123 


122 


040 


067102 


127 


101 


123 


067105 


000 






067106 


200 


103 


123 



MACRO Y0S.02 Mon^y 07 -Oct -85 16:57 P«9« 461-5 



.ASCII <CRLF>/15- TEST SELECTED BANKS/ 



SEQ 0413 



.ASCII <CRLF>/16- TEST ALL BANKS/ 



.ASCII <CRLF>/17- ENABLE TRACE/ 



.ASCII <CRLF>/18- DISABLE TRACE/ 



.BYTE 15.12.0 

.ASCIZ <CRLF>/UHICH CSR(O-F)? / 



.ASCIZ <CRLF>/CSR UORD? / 



.ASCIZ <CRLF>/CSR DOES NOT EXIST/ 



.ASCIZ <CRLF>/COmAND:/ 
.ASCIZ <CRLF>/OLO CSR UAS/ 

.ASCIZ <CRLF>/CSR IS NOU/ 



CVHJ*80 f1SVli-J MEMORY DIAG. 
MESSAGCS 



MACRO Y05.02 Mon<lay 07 -Oct 65 16:57 P*9« 461 6 



SEQ 0414 



14977 



14978 



14979 



14980 



14981 



14982 



14983 



14984 
14985 



067111 


122 


040 


111 


067114 


123 


040 


116 


067117 


117 


127 


000 


067122 


200 


105 


130 


067 123 


101 


115 


111 


0671S0 


116 


105 


040 


067133 


115 


105 


115 


067136 


117 


122 


131 


067141 


000 






067142 


200 


102 


101 


067145 


116 


113 


050 


067150 


060 


055 


061 


067153 


067 


067 


051 


067156 


077 


040 


000 


067161 


200 


120 


110 


067164 


131 


123 


111 


067167 


103 


101 


114 


067172 


040 


101 


104 


067175 


104 


122 


105 


067200 


123 


123 


050 


067203 


060 


055 


061 


067206 


067 


067 


065 


067211 


067 


067 


067 


067214 


066 


051 


07' 


067217 


040 


000 




067221 


200 


120 


101 


067224 


122 


111 


124 


067227 


131 


040 


101 


067232 


102 


117 


122 


067235 


124 


032 


000 


067240 


200 


124 


111 


067243 


115 


105 


117 


067246 


125 


124 


040 


067251 


124 


122 


101 


067254 


120 


032 


000 


067257 


200 


102 


131 


067262 


120 


101 


123 


067265 


123 


111 


116 


067270 


107 


040 


105 


067273 


103 


103 


040 


067276 


124 


105 


123 


067301 


124 


123 


040 


067304 


117 


116 


040 


067307 


102 


101 


116 


067312 


113 


040 


000 


067315 


040 


104 


125 


067320 


105 


040 


124 


067323 


117 


040 


123 


067326 


102 


105 


040 


067331 


114 


117 


103 


067334 


101 


124 


111 


067337 


117 


116 


123 


067342 


000 






067343 


121 


126 


000 


067346 


200 


115 


117 


067351 


104 


111 


106 


067354 


131 


040 


115 



14986 



14987 



14986 



14989 



14990 



14991 



14992 



14993 



14994 



c 
a 


ntnuKT 


tSTAtl 


M4ron 


Vf> 1 33 ' 




113 


117 

11' 


1 30c 


Ice 


lOl 






CwV 


117 
11' 


114 
1 1^ 


n*7X70 


in4 

Iw^ 


040 


1 04 

Iw^ 




AwA 


1 94 


1 01 
Iwl 




w^w 




101 






040 

w 


OOO 


nA7AAA 


CwV 


1 04 


101 
Xwl 


Km 1 




1 m 

Iwl 


040 


ntkiA 1 7 

' ^ Ac 


111 


1 9'S 
lev 


040 




1 1 A 
1 Iw 


117 
11' 


197 

XC ' 




040 

w^W 


OflO 

wwV 






POO 

CwV 


111 
111 


1 1 A 
XXw 




1 PO 

ICw 


1 PS 

1C3 


1 94 
Ic^ 




040 

w^ v 


1 lit 
llw 


10S 
Xw^ 




1P7 

XC ' 


040 
w^w 


104 

X w^ 




101 

XwX 


194 


101 
Xwl 




077 

V ■ ■ 


040 

V^V 


000 
vvv 


067444 


POO 

K Vw 


IPS 

XCv 


105 

Xw J 


067447 


114 


105 

Xw J 


lOS 

XVw 




1P4 


040 
w^w 


lOP 

XwC 


0674SS 

VW ' ~ <J <J 


101 

Aw A 


116 

X Xw 


lis 

XXV 




040 


046 


040 


067463 


1P4 


105 

X V^ 


IPS 

XC w 


WW ' ^ww 




OOO 
vw 




067470 


POO 


lOP 

X vc 


101 

xvx 


067473 


116 


113 


040 

V^ V 


067476 


116 

A X W 


117 

X X * 


124 


067S01 


040 


101 

X vx 


103 

X VW 


WW ' Jw^ 


103 


105 

X V^ 


IPS 

xe V 


WW 1 ^w ■ 


123 


101 

xvx 


lOP 

xvc 


WW V 


114 


105 

XV^ 


OOO 

wv 




POO 


1P4 

xc^ 


105 

X v^ 




IPS 


1P4 

XC^ 


050 


067S23 


060 


055 


064 


067526 


067 


051 

V J X 


077 


067SS1 


040 


000 




067533 


200 


124 


105 


067536 


1P3 


1P4 

XC^ 


040 


067541 


060 


040 


104 

X v^ 


067544 


101 

A V A 


124 


101 

xvx 


067547 


040 


111 

XXX 


123 


067552 


077 


040 

W^ V 


000 


067555 


POO 

c vv 


1P4 

xc~ 


117 

XX * 


067560 

Vw • ^WV 


040 


105 

XV^ 


IPS 

xc w 


067563 


103 

A VW 


iOi 

xvx 


IPO 

XC V 


067566 

WW ■ ^ww 


105 

AV^ 


040 

v^v 


1P4 

Xk~ 


067571 


131 


120 


105 


067574 


040 


101 


116 


067577 


131 


040 


113 


067602 


105 


131 


200 


067605 


012 


012 


000 


067610 


200 


124 


105 


067613 


123 


124 


040 


067616 


103 


117 


115 


067621 


120 


114 


105 


067624 


124 


105 


000 
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SEQ 0415 



CvnjAeo nSVll-J MEMORY OXAG. 
MESSAGES 



14995 



14996 



14997 
14998 



14999 



ISOOO 



15001 

15002 
15003 

15004 



Oft 762 1 


V4V 


1 ID 


117 
X X > 








1 ni 

lUl 




Ico 


XwX 


111 

XXX 




1 1 A 
114 


1 m 

Iwl 


1 no 




11* 


Xw9 


04A 

v*v 


vO f D^O 


IXO 


X A « 


127 
xc * 




n4A 
v^v 


w3? 


040 
v^v 


067654 


124 


122 


131 


067657 


040 


114 


101 




1 94 


lOS 

XV J 


1 22 
Xc£ 




n4i 

V4X 


vw 




wo r OO ' 


200 
c w 


102 
X V£ 


101 
xvx 


VO rO r c 


1 1 A 


1 1 Y 
XX J 


040 

v^v 


WO # O » J 


122 


X v^ 


121 
xcx 


VO • • w 


125 

XC J 


111 

XXX 


122 
xcc 


VO • • Vw 


XV J 


123 

XCw 


040 
v^v 


M77M 


122 
xcc 


105 
xv^ 


114 

xx^ 


M771 1 

VO • • XX 


1 17 

XX ' 


103 

XV<9 


101 
xvx 


M7714 

VO • • 


124 


111 
XXX 


117 


VO • ' A » 


A Aw 


000 

WWW 






IPO 


117 


127 




105 

AW^ 


122 

XCK 


040 


067730 

WW » • wV 




105 

xwv 


103 

X W^ 


067733 


117 


126 

xcw 


105 


VO • » 


122 


131 

X^X 


000 


067741 


200 


123 

XK v 


117 


067744 


102 

A WC 


055 


101 


OA7747 

VO » • ^ » 


055 

W^^ 


114 


117 


0677S2 


116 

X XW 


107 


040 


067755 


124 


105 

X Wi# 


123 


Ww • • wV 


124 


ooo 

www 




Vw r f wC 


200 

sww 


102 

X wc 


105 


M77A^ 

W r « 


114 


114 

X *^ 


040 


<Wi7770 


075 


040 


105 

X W^ 


067773 


101 
xvx 


103 


110 


067776 

Vw f f r w 


040 


120 


101 


070O01 


123 


123 

XK w 


040 




103 

X W«^ 


117 

XX • 


115 


V • WW 1 


120 

xcv 


114 

X x^ 


105 


W f WW AC 


124 


105 


000 


W • WW A 


200 


040 


040 


V • WW£W 


103 

XV J 


123 


122 

XCC 


070023 

W 1 WW& 


040 


040 

W^W 


040 

w^w 


070026 


040 


103 


123 


070031 


122 


040 


056 


070034 


056 


056 


000 


070057 


077 


077 


077 


070042 


077 


077 


077 


070045 


000 






070046 


111 


116 


120 


070051 


125 


124 


040 


070054 


115 


125 


123 


070057 


124 


040 


102 


070062 


105 


040 


101 


070065 


000 






070066 


116 


040 


117 
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.ASCIZ / NOT AVAILABLE NQU TRY LATER!/ 



SEQ 0416 



, ASCIZ <CRLF>/BANK REQUIRES RELOCATION/ 



.EVEN 



.ASCIZ <CRLF>/SOB A-LONG TEST/ 



.ASCIZ <CRLF>/ CSR 



CSR 



.ASCIZ /N OCTAL / 



ISOOS 
15006 

15007 



15000 
15009 



15010 



15011 



15012 



15013 



1 - 

e 




OIAG. 


MACRO 


070071 


103 


124 


101 




114 


040 


000 


070077 


116 


125 


115 


070102 


102 


105 


122 


070105 


200 


000 




070107 


040 


104 


105 


070112 


103 


111 


115 


070115 


101 


114 


040 


070120 


OOO 






070121 


200 


105 


122 


070124 


122 


117 


122 


070127 


11.3 


040 


076 


070132 


040 


062 


060 


070135 


040 


055 


040 


070140 


101 


102 


117 


070143 


122 


124 


111 


070146 


116 


107 


040 


070151 


106 


117 


122 


070154 


040 


ISO 


130 


070157 


104 


120 


040 


070162 


103 


110 


101 


070165 


111 


116 


000 


070170 


106 


101 


124 


070173 


101 


1)4 


040 


070176 


COO 






070177 


113 


040 


127 


070202 


117 


122 


104 


070205 


123 


040 


117 


070210 


106 


040 


115 


070213 


105 


115 


117 


070216 


122 


131 


040 


070221 


124 


117 


124 


070224 


101 


114 


200 


070227 


000 






070230 


200 


122 


105 


070233 


106 


122 


105 


070236 


123 


110 


040 


070241 


124 


105 


123 


070244 


124 


000 




070246 


200 


122 


105 


070251 


114 


117 


103 


070254 


101 


124 


111 


070257 


117 


116 


040 


070262 


116 


117 


124 


070265 


040 


120 


117 


070270 


123 


123 


111 


070273 


102 


114 


105 


070276 


032 


000 




070300 


200 


040 


040 


070303 


102 


101 


116 


070306 


113 


040 


040 


070311 


105 


122 


122 


070314 


117 


122 


123 


070317 


200 


000 




070321 


200 


105 


116 


070S24 


104 


040 


120 


070327 


101 


123 


123 
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.ASCI2 /NUMBER/ <CRLF> 
.ASCIZ / DECIMAL / 



SCO 0417 



.ASCIZ <CRLF> /ERRORS > 20 - ABORTING FOR XXOP CHAIN/ 



.ASCIZ <CRLF> /REFRESH TEST/ 



.ASCIZ <CRLF>/ENO PASS #/ 



cvnjABO nsvii-j riEnoRY diag. 

MESSAGES 



15014 



15015 

15016 
15017 

1501S 

15019 

15020 

15021 
15022 

15023 



15024 







04'^ 








1 OS 
XV J 


1?? 
xcc 






117 

XX ' 


1 ?p 
xcc 






12S 


051 

V J X 






104 
xw^ 


10S 
X VJ 






lOS 

XV J 


103 




194 


XV J 


104 

X 


V ■ V J J ■ 


200 


000 






cw 


106 

X Vv 


111 

XXX 




1 14 


114 


040 




103 


117 

* X ( 


125 

XC J 


A7057P 


1 lit 

X Xw 


124 

XC^ 


OSO 


w • ^ 


117 


103 


124 




101 


114 

X X^ 


051 




077 


040 


000 




200 


113 

X x*/ 


105 


07041 1 


122 


116 


105 


070414 


114 

X X^ 


040 


123 

XS w 


070417 


124 

XK^ 


101 


103 


070422 


113 


000 




070424 


200 


123 

XC^ 


125 


070427 


120 


105 


122 


0704 32 


126 


111 


123 


070435 


117 


122 


040 


070440 


12S 

XC W 


124 


101 


070443 


103 


113 


000 


070446 


200 


125 


123 


070451 


105 


122 


040 


070454 


123 


124 


101 


070457 


103 


113 


000 


070462 


040 


111 


123 


070465 


040 


105 


115 


070470 


120 


124 


131 


070473 


000 






070474 


122 

XCK 


105 


114 


070477 


117 


103 


101 


070502 


124 

XK^ 


105 


104 


070505 


040 


040 


000 


070510 


102 

X 


101 


116 


070513 


113 


075 


000 


070516 


040 


040 


124 


070S21 


105 

XW J 


123 


124 


070524 


075 


000 




070S26 


200 


105 


116 


070531 


124 


105 


122 


070534 


111 


116 


107 


070537 


040 


lis 


101 


070542 


115 


111 


lis 


070545 


101 


132 


105 


070550 


040 


115 


117 


070553 


104 


105 


000 


070556 


200 


114 


105 


070561 


101 


126 


111 


070564 


116 


107 


040 


07056'» 


113 


101 


115 


0705T. 


111 


113 


101 


070575 


132 


105 


040 
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5G079: .ASCIZ / ERROR(S) DETECTEO/<CRLF> 



ASCIZ <CRLF>/FILL COUNT(OCTAL)? / 

.ASCIZ <CRLF> /KERNEL STACK/ 

.ASCIZ <CRLF> /SUPERVISOR STACK/ 

.ASCIZ <CRLF>/USER STACK/ 

.ASCIZ / IS EMPTY/ 

.ASCIZ /RELOCATED / 



SEQ 0418 



.ASCIZ 
.ASCIZ 



/BANK-/ 
/ TEST-/ 



.ASCIZ <CRLF> /ENTERING KAMIKAZE MODE/ 



, ASCIZ <CRLF> /LEAVING KAMIKAZE MODE/ 



15025 



15026 
15027 



15028 



15029 



15030 



15031 



MSVll J 

s 


MEriORY 


OIAG. 


HACRO 


070600 


115 


117 


104 


070603 


105 


000 




070605 


200 


114 


105 


070610 


101 


126 


111 


070613 


116 


107 


040 


070616 


106 


123 


040 


070621 


115 


117 


104 


070624 


105 


200 


000 


070627 


032 


000 




070631 


200 


105 


116 


070634 


124 


105 


122 


070637 


040 


102 


101 


070642 


116 


lis 


123 


070645 


040 


055 


040 


070650 


125 


123 


105 


070653 


040 


116 


125 


070656 


115 


102 


105 


070661 


122 


040 


062 


070664 


060 


060 


040 


070667 


124 


117 


040 


070672 


124 


105 


122 


070675 


115 


111 


116 


070700 


101 


124 


105 


070703 


000 






070704 


200 


103 


101 


070707 


103 


110 


105 


070712 


040 


111 


123 


070715 


040 


117 


106 


070720 


106 


000 




070722 


200 


103 


101 


070725 


103 


110 


105 


070730 


040 


111 


123 


070733 


040 


117 


116 


070736 


040 


050 


105 


070741 


130 


103 


105 


070744 


120 


124 


040 


070747 


104 


125 


122 


070752 


111 


116 


107 


070755 


040 


101 


103 


070760 


124 


125 


101 


070763 


114 


040 


120 


070766 


101 


124 


124 


070771 


105 


122 


116 


070774 


123 


051 


000 


070777 


200 


117 


116 


071002 


114 


131 


040 


071005 


123 


105 


114 


071010 


105 


103 


124 


071013 


105 


104 


040 


071016 


102 


101 


116 


071021 


113 


123 


040 


071024 


127 


111 


114 


071027 


114 


040 


102 


071032 


105 


040 


124 


071035 


105 


123 


124 


071040 


105 


104 


000 


071043 


200 


101 


114 
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nSG103: .ASCIZ <CRLF>/LEAVING FS nOOE/<CRLF> 



MSG104: .BYTE 32.0 ; CONTROL Z 

MSG105: .ASCIZ <CRLF>/ENTER BANKS USE NUMBER 200 TO TERMINATE/ 



SEQ 0419 



MSG106: .ASCIZ <CRLF> /CACHE IS OFF/ 



MSG107: .ASCIZ <CRLF>/CACHE IS ON (EXCEPT DURING ACTUAL PATTERNS)/ 



MSGllO: .ASCIZ <CRLF>/ONLY SELECTED BANKS UILL BE TESTED/ 



MSGlll: .ASCIZ <CRLF>/ALL BANKS UILL BE TESTED/ 



CVMJABO MSVll 
MESSAGES 



■J nEHORY OXAG. 
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SEQ 0420 



15032 



15033 

1S034 

15035 

15036 
15037 

15038 

15039 



15040 
15041 





114 


040 


102 

xvc 


V r XW^X 




1 16 


lis 

X X<9 




123 


040 


127 

XK 1 


V r r 


111 


114 


114 

X X^ 


A71 AA^ 




102 


105 


n7iMS 


040 




105 

XVW 


071070 


123 


124 


105 

X»^ 


V ' XV f J 


104 


000 




071075 


113 

A X v 


040 


117 


071100 


106 


040 


121 


071103 


055 


102 


125 


071106 


123 


040 


120 


071111 


101 


122 


111 


071114 


124 


131 


040 


071117 


115 


105 


115 


071122 


117 


122 


131 


071125 


200 


000 




071127 


lis 


040 


117 


071132 


106 


040 


105 


071135 


103 


103 


040 


071140 


115 


105 


115 


071143 


117 


122 


131 


071146 


200 


000 




071150 


200 


040 


040 


071153 


040 


061 


061 


071156 


057 


070 


064 


071161 


000 






071162 


200 


040 


040 


071165 


040 


061 


061 


071170 


057 


070 


063 


071173 


000 






071174 


200 


040 


040 


071177 


040 


116 


117 


071202 


000 






071203 


040 


103 


101 


071206 


103 


110 


105 


071211 


040 


101 


126 


071214 


101 


111 


114 


071217 


101 


102 


114 


071222 


105 


000 




071224 


040 


103 


101 


071227 


103 


110 


105 


071232 


040 


102 


131 


071235 


120 


101 


123 


071240 


123 


105 


104 


071243 


000 






071244 


200 


103 


123 


071247 


122 


040 


116 


071252 


125 


115 


102 


071255 


105 


122 


040 


071260 


000 






071261 


040 


103 


117 


071264 


116 


124 


122 


071267 


117 


114 


123 


071272 


040 


124 


117 


071275 


117 


040 


115 


071300 


101 


116 


131 



.ASCIZ /K OF Q-BUS PARITY MEMORY/<CRLF> 



.ASCIZ <CRLF>" 11/84" 



.ASCIZ <CRLF>" 11/83" 



NO/ 



nSGA122: .BYTE 0 

.ASCIZ / CONTROLS TOO MANY BANKS/ 



CVnjABO hSVll 
MESSAGES 



■J MEMORY OIAG. 
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071303 


040 


102 


101 


071306 


116 


113 


123 


071311 


000 






15042 071312 


040 


120 


101 


071315 


123 


123 


105 


071320 


123 


040 


103 


071323 


117 


115 


120 


071326 


114 


105 


124 


071331 


105 


104 


000 


15043 071334 


200 


120 


122 


071337 


117 


107 


122 


071342 


101 


115 


040 


071345 


103 


123 


122 


071350 


040 


103 


117 


071353 


125 


114 


104 


071356 


040 


116 


117 


071361 


124 


040 


102 


071364 


105 


040 


104 


071367 


105 


124 


105 


071372 


122 


115 


111 


071375 


116 


4 AS 

105 


104 


071400 


000 






15044 071401 


'^AA 

200 


124 


122 


071404 


101 


4 AV 

103 


4 AV 

105 


071407 


AAA 

040 


4 AS 

105 


4 4 A 

116 


071412 


101 


102 


114 


071415 


4 AC 

105 


4 AA 

104 


AAA 

000 


15045 071420 


200 


4 '^A 

124 


122 


071423 


4 A4 

101 


4 AV 

103 


4 AC 

105 


071426 


AA A 

040 


4 AA 

104 


4 4 4 

111 


A^ 4 A V 4 

071431 


4 «W 

123 


4 A4 

101 


4 A^ 

102 


A^ 4 A V A 

071434 


4 4 A 

114 


4 AC 

105 


4 AA 

104 


071437 


AAA 

000 






«KAAX A^4AAA 

15046 071440 


*%AA 

200 


OAA 

200 


AA A 

040 


071443 


040 


AA A 

040 


AAA 

040 


A^ 4 M 

071446 


AA A 

040 


AA A 

040 


AAA 

040 


A^« 

071451 


AAA 

040 


AAA 

040 


AAA 

040 


A^« MKM 

071454 


AAA 

040 


AAA 

040 


AAA 

040 


A^ 4 A 

071457 


AAA 

040 


AAA 

040 


4 A V 

103 


A^ 4 

071462 


4 

123 


122 


AAA 


A^ 4 K 

071465 


4 4 K 

115 


4 A4 

101 


4 *%A 

120 


A^ 4 M ^A 

071470 


^AA 

200 


AAA 
OOO 




4 KAA ^ A^4A^^ 

15047 071472 


AA 

200 


AA A 

040 


« AV 

103 


071475 


126 


4 4 C 

lis 


4 4^ 

112 


071500 


4 A4 

101 


4 A^ 

102 


AAA 

060 




AAA 






071S06 


103 


103 


057 


071511 


120 


101 


122 


071514 


111 


124 


131 


071517 


040 


115 


105 


071522 


115 


117 


122 


071525 


131 


040 


104 


071S30 


111 


101 


107 


071533 


116 


117 


123 


071556 


124 


111 


103 


071541 


000 






15040 071542 


200 


200 


000 



MSG125: .ASCIZ / PASSES COMPLETED/ 



MSG126: .ASCIZ <CRLF> /PROGRAM CSR COULD NOT BE DETERMINED/ 



MSG127: .ASCIZ <CRLr>/TRACE ENABLED/ 



MSG128: .ASCIZ <CRLF>/TRACE DISABLED/ 



MSG006: .ASCIZ <CRLF><CRL«^>/ 



CSR MAP/<CRLF> 



nSGOOO: .ASCIZ <CRLF>" CVMJABO ECC/PARITY MEMORY DIAGNOSTIC* 



MSG129: .ASCIZ <CRLF><CRLF> 



cvnjABo nsvii-j rcnoRY oiag. 

riESSACES 



15049 


071545 


120 


122 


117 




071550 


103 


105 


123 




071553 


123 


117 


122 




071556 


040 


116 


117 




071561 


124 


040 


123 




071564 


125 


120 


120 




071567 


117 


122 


124 




071572 


105 


104 


040 




071575 


102 


131 


040 




071600 


124 


110 


111 




071603 


123 


040 


104 




071606 


111 


101 


107 




071611 


116 


117 


123 




071614 


124 


111 


103 




071617 


000 






ISOSO 


071620 


200 


125 


116 




071623 


111 


102 


125 




071626 


123 


040 


115 




071631 


105 


115 


117 




071634 


122 


131 


040 




071637 


127 


4 4 4 

111 


114 




071642 


114 


040 


116 




071645 


117 


124 


040 




071650 


102 


105 


040 




071653 
071656 


124 


105 


123 




124 


105 


104 




071661 


200 


000 




15051 










15057 


071664 








15058 


071664 








15059 


071664 


010414 






15063 




000200 
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MSG130: .ASCIZ /PROCESSOR NOT SUPPORTED BY THIS DIAGNOSTIC/ 



SEQ 0422 



NOUeriT: .ASCZZ <CRLF>/UNZBUS HEHCRY WILL NOT BE TESTED/<CRLr> 



END: 



.EVEN 
MEND 

.•»«I»IT 60000- SUPLZniT 
.END STMTS 



I SUPERVISOR ADORSSSE.C LEFT 



CVMJA80 


MSVll-J MEMORY 


DIAG. 


MACRO Y05.02 


Monday 07 


-Oct -as 


Syadol 


tar 








ABORT 


052220 


BRGOBB 


027500 


B61 


035004 


A60RTC 


052252 


BSIZE 


002 S74 


862 


035210 


A80RTE 


052S16 


BO 


004740 


863 


035214 


ABORTF 


002144 


Bl 


005744 


864 


036352 


ABORTZ 


0S2S42 


BIO 


012S50 


865 


036360 


ACFLAG 


002116 


BlOO 


045746 


866 


036510 


ACTFLA 


002SS0 


BlOl 


045754 


867 


036524 


Aooncs 


0020 S4 


B102 


05SS72 


87 


012306 


ANA2 


007460 


BIOS 


05SS76 


870 


043416 


APTDOW 


040626 


B104 


05S674 


871 


043654 


APTECC 


002424 


BIOS 


OSS" *>6 


872 


044136 


APTFLA 


002S52 


B106 


054052 


B7S 


044432 


APTHAN 


014014 


Bll 


01S076 


•74 


044432 


APTMLT 


040674 


B12 


01S146 


•75 


044530 


APTPAR 


002422 


BIS 


01S210 


876 


045470 


APTSIZ 


002444 


B14 


014060 


877 


045474 


BACK 


051440 


B15 


015476 


CACHKf 


002550 


BACKGN 


0S2516 


B16 


015746 


CACNKN 


002544 


BAD 


002052 


B17 


015754 


CACHQF- 


104424 


BADPC 
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